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iouee et 
DH11 AUTO-ECHO TEST 
: COPYRIGHT 1972, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 51754 
:STARTING PROCEDURE 
:LOAD PROGRAM 
i boree BOReT 
[PROGRAM WILL DH11 AUTO-ECHO TEST 
>PROGRAM WILL TYPE “VECTOR ADDRESS-" 
: TYPE IN THE ADDRESS OF THE RECEIVER INTERRUPT VECTOR 
:FOR THE DHI1 TC BE TESTED Y <CARRIAGE RETURN? 
: WILL TYPE “CONTR BO Be otto ss-" 
:TYPE IN THE ADDRESS OF THE Rete n CONTROL REGISTER 
“FOR THE DHI1 TO BE TESTED, FOLLOWED BY <CARRIAGE RETURN? 
: WILL TYPE “R™ TO INDICATE THAT TESTING HAS STARTED 
: PROGRAM WILL TYPE ™ DZDHH ” 


Bee re RR Pe Ei otn orn 6 bonis -t.000~ 1trUn £ Gotue- 
ae 


100009 SW15=100000 3=1,HALT ON on ERs 
40000 SW14=40000 3=1,LO0P URRENT LS 
aul =o SSL INHIBIT ERROR 
le=] 
009 Sata 321, INHIBIT_ITERATIONS 
10=2000 321,ESCAPE TO NEXT TEST ON ERROR 
> 001000 SW09=1000 3=1,LOOP WITH CURRENT DATA 

000400 SWO8=400 
009100 $W06=10C 
OGO040 SWwOS=40 
000920 SWO4=20 
000010 SWO3=10 
000004 =4 
000052 SWOl=2 ;RESTART PROGRAM AT SELECTED TEST 
090001 SWCO=1 : ;RESELECT VECTOR AND CONTROL REGISTER 


;RDDRESS AFTER PROGRAM RESTART 


ee en ee ne oe re ee ee: 


oT eee 


COl 
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| DZOHHB.P 1) 
33 
i 45 
al ;REGISTER DEFINITIONS 
| 43 O0c0090 RO=" ;GENERAL REGISTER 
; OR Bh ee ae 
SA ; 
46 Bopoes RI=%3 ; GENERAL RECTETER 
47 OCoo04 R4=%4 GENERAL REGISTER 
42 000005 RS=%5 : GENERAL REGISTER 
St] 000006 SP=%6 : PROCESSOR STACK POINTER 
a 900067 PC=%7 : PRO GRAM COUNTER 
i z ;LOCATION EQUIVALENCIES 
oe 177570 SWR=177570 ;CONSOLE SWITCH REGISTER 
| ss 177579 LIGHTS=177570 sPOP = 11745 Ottley REGISTER 
5é 177776 PS=177776 PROCESSOR STATUS WORD 
' 2 015460 STACK=ENDCOD+200; START OF PROCESSOR STACK 
ZR ; INSTRUCTION DEFINITIONS 
£1 OOS74E PUSH1SP=S746 s;DECREMENT PROCESSOR STACK 1 WORD 
t2 00S726 POP 1SP=S726 : INCREMENT roe STACK 1 WORD 
63 010046 PUSHRO=1 : RO 
se 012600 POPRO=1 sRESTORE 
és 024645 PUSH2SP=2464E ; DECREMENT erat TWICE 
c& 02262 POP2SP= NCREMENT STACK 
#4 -EQUIV EMT,HLT *BASIC DEFINITION OF ERROR CALL 
&3 
70 100000 B1T15=100000 
7} 040009 BIT14=40000 
7e 020009 BIT13= 
73 010000 8iTle=1 
74 004080 BIT11=4000 
7s 002000 B1T10=2000 
76 001000 BIT09=1000 
77 080400 BITO8=400 
7é BIT07=200 
73 900100 BIT06=100 
80 090040 BITOS=40 
81 000020 BITO4=20 
Se 000010 BITO2=10 
82 000004 BIT9e=4 
es 009002 BITOl=2 
gs 000091 BIT00=1 


eee 





— 
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DCOHK OMACYI] eri732) e8-SEP-7& 18:23 PAGE 14S 





DZDHHB.P11 , 
8 ‘ ; RAPCATCAER FOR ILLEGAL INTERRUPTS 
88 oo9000 .+2 sUNEXPECTED TRAP TO THIS LOCATION 
= Sa ic RENE En Tene ro aoe Tecan 
91 eee’ HALT ENTE EP cr TO FIND CAU 
92 000010 +2 UNEXPECTED TRAP TO THIS LOCATION 
83 000012 990000 HALT s EXAMINE STACK TO FI 
94 090014 000916 +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
85 O00016 HALT “EXAMINE STACK TO 
% 000020 o0002e2 +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
§7 000022 900000 HALT “EXAMINE STACK TO FIND CAUSE 
98 900024 o00026 +2 *UNEXPECTED TRAP TO THIS LOCATION 
85 9000265 50050 HALT sEXAMINE STACK TO 
1990 900030 +2 :UNEXPECTED TRAP TO THIS LOCATION 
| 401 oo0032 900000 HALT ‘EXAMINE STACK TO 
| 102 000034 000036 +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
103 900036 990000 HALT > EXAMINE 1a TO 
| 104 990040 o00042 +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
10S oo0042 o00000 HALT ‘EXAMINE STACK TO 
| 106 900044 00046 +2 UNEXPECTED TRAP TO THIS LOCATION 
107 90004 000000 HALT *EXAMINE STACK TO FIND CAUSE 
| 108 00050 o000S2 +2 *UNEXPECTED TRAP TO THIS LOCATION 
| 03 Oo00S52 900000 HALT sEXAMINE STACK TO FIND CAUSE 
| 116 009054 900056 +2 *UNEXPECTED TRAP TO THIS LOCATION 
' 11 000056 900000 HALT “EXAMINE STACK TO F 
|  ii2 000060 o00062 +2 UNEXPECTED TRAP TO THIS LOCATION 
' 413 000062 oo0000 HALT “EXAMINE STACK TO F 
| 114 900064 900065 +2 :UNEXPECTED TRAP TO THIS LOCATION 
' JIS 900066 900900 HALT “EXAMINE STACK TO FIND CAUSE 
| 116 000070 o0007e +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
| 117 900072 900000 HALT sEXAMINE STACK TO 
/ 118 000074 000076 te UNEXPECTED TRAP TO THIS LOCATION 
' 119 900076 900000 { HALT sEXAMINE STACK TO 
, 420 000100 000102 ‘ +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
| 221 000102 00000 \ HALT *EXAMINE STACK TO 
| Tee 00104 000106 % +2 UNEXPECTED TRAP TO THIS LOCATION 
' 123 000106 oo0000 HALT : > EXAMINE rennek TO FIND 
' 424 000110 O0011e +2 UNEXPECTED TRAP TO THIS LOCATION 
| 185 900112 900000 HALT *EXAMINE STACK TO F 
lee 000114 000116 te, s UNEXPECTED TRAP TO THIS LOCATION 
| 152 00128 popt oe ) +e i PREECE TED. TRAP TO Wars LOGATION 
Ips 900 1¢2 000000 HALT sEXAMINE STACK TO 
«130 «O00124 000126 +2 : CTED TRAP TO THIS LOCATION 
131 00012 000000 HALT pee STACK tor NO CAUSE ON 
{ ous s H 
«FB BBBTB BBA Hac tPNBNINE STACK TO FINO 
134 000134 000136 ite, sUNEX C ‘ FTO THIS LOCATION 
ee & 3 eat eats +2 . te TO Ors URE ATION 
| 137 O00142 oc0000 HALT *EXAMINE STACK TO FIND CAUSE 
' 38 000144 o00146 +2 : CTED TRAP TO THIS LOCATION 
1339 000146 000000 r* HALT “EXAMINE STACK TO FIND CAUSE 
140 0909150 000152 +2 “UNEXPECTED TRAP TO THIS LOCATION 
141 900152 00000 HALT “EXAMINE STACK TO FIND CAUSE 
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DZDHHS.P1! 
142 oc01S4 O00156 42 sUNEXPECTED TRAP oe, THIS shocATion 
i antes sate “ eat T TRAP T MO Lee ATION 
tie Bootes ger ihe re Hat a: a 
146 go0168 000166 fee iu : Thee 10 Th 18 LOCATION 
| 148 Oo176 600172 ie, eat. Be TO THIS LOCATION 
ane 
ig ete ents +2 SNENPEET Po a Mors LOCATION 
151 000176 900000 HALT UTE STACK TO FIND 
152 000200 o00202 42 ‘UNEXPECTED TRAP TO THIS LOCATION 
153 000202 900000 HALT EXAMINE STACK TO FIND CAUSE 
iS4 000204 00205 42 ‘UNEXPECTED TRAP 19 THIS LOCATION 
155 000206 900000 HALT SEXAMINE STACK TO FIND 
155 000210 o00212 42 UNEXPECTED TRAP 19 THIS LOCATION 
157 000212 00000 HALT EXAMINE STACK TO F 
158 000214 O00e16 42 UNEXPECTED TRAP TO Mars LOCATION 
159 000216 00000 HALT jEXBITNE relhck TO FI 
160 sites ne Thee 70 TH THIS LOCATION 
1 40 Eon wprAce fo Ft TO LOCATION 
163 HALT EXAMINE STACK 10 F IND CAUSE ia 
eairce TY 4 
165 O00S32 HALT ie ACK TO b 
| 166 900834 wifey s UNEX CTED p 10, THIS LOCATION 
| ce pie +2 + PNENEE 79 THIS LOCATION 
169 O00e42 HALT EXAMINE STACK TO FIND CAUSE 
70 900244 42 *UNEXPECTED TRAP 19 THIS LOCATION 
: HALT EXAMINE STACK TO FIND CAUSE 
‘tee s UNEXPECTED TRA 10 THIS LOCATION 
+2 : NPE TED Tae TO WO IS LOEATION 
HALT jEXANINE ACK To FIND CAUSE se 
1 setruce - s TRAP 
NSE HALT Hahah Benine STAG TO ay Rats” 
zs es) * UNE XPE Rap 70, THIS LOCATION 
HALT > EXAM TACK T TO F NO CAUSE 
| 40 zs fare 70 TH THIS LOCATION 
x's iene AERA T nurs € LBEATION 
| 1 bovers HALT ACK TO OND CAUSE 
! : #2 iu TRae 10 THIS LOCATION 
| Be ie « ‘pense stock 0 Tats LOCATION 
ey 1 § SEARING STAGk To F1io THIS LOCATION 
ies renye HALT i ETRE Stace Fo PING shoe 
, 190 900314 42 + ENENPECTED TRAP TO mors LOCATION 
| 491 900316 HALT EXAMINE STACK TO FI 
| ge poc3e0 42 *UNEXPECTED TRAP TO THIS LOCATION 
| 143 HALT ‘EXAMINE STACK TO FIND 
| 194 = 000324 +2 s UNE XPECTED TRAP TO THIS LOCATION 
' = $95 900326 HALT EXAMINE STACK TO FIND CAUSE 
| $96 900330 42 UNEXPECTED TRAP 19 THIS LOCATION 
187 000332 HALT tEXAMINE STACK TO FIND CAUSE 
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ere TACK TO PIN ND. CAUSE 
UNEXPECTED TRAP 9 THIS LOCATION 
sEXBAINE STACK TO FIND CAUSE 

Aine 3 TRAP TO THIS LOCATION 
iene TO_FIND 
; UNEXPE Y THIS LOCATION 
SENANINE Track TO_ FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 


j EXAMINE O_ FIND CAUSE 
XPECTED TRAP TO THIS LOCATION 


‘EXERT STACK TO FIND CAUSE 
XPE TRAP THIS LOCATION 
I ACK TO FIND CAUSE 
t UNEXPEC TRAP TO THIS LOCATION 
;EXAMINE STACK TO FIND 
; UNEXPECTED Pano eras LOCATION 
STNEXPECTED TRAP. TO TO THIS LOCATION 
SONEXPES BD TRAP TO-THI LOCATION 
IEVGnIRE STACK TO 
TED TRAP TO mre LOCATION 


Dave SIO To Fe Pn anes TION 


;EXAMINE STACK TO F 


INO 
TRAP TO THIS LOCATION 
SENANINE. STACK 70 FIND 
; UNEXPECTED TRAP TO THIS LOCATION 


IUReXPrcTED TRAP TO THIS LocAT TON 


;EXAMINE STACK TO FIND CAUSE 
;UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
;UNEXPECTED TRAP TO THIS LOCATION 


inesoreTe The 19 THIS LOCATION 


1 FIND CAUSE 
y 3 THIS LOCATION 


ete STACK TO F 

;UNEXPECTED TRAP 10. THIS LOCATION 
;EXAMINE STACK TO FIND CAUSE 
;UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO FIND CAUSE 
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0s eR | 


SR IRROGRC OSE IRA LORE RSE IRS E RE Bd Tool Sanaa eee T ERE BoC 


000S14 
000516 
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-+2 
HALT 


HALT 


GO1 


Ree Ef TRAP ? Lig A es 
NE _ STACK TO_F 


Beane hale'h THIS OEATION 


mee ab ee LOCATION 
; tENRNT ack T TO. 
;UNEXPECTED TRAP TO THIS LOCATION 


ee tem 
ee AL ar ae 


; EXAMINE STi CAUSE 
; UNEXPE APRAP TO. TO THIS LOCATION 


tENBINTNE STACK TO FIND CAUSE 

: UNE TED TRAP TO THIS LOCATION 

3; EXAMINE ACK TO FIND CAUSE 
XPECTED TRAP TE THIS LOCATION 

: EXAMINE STACK TO F 

: ECTED TRAP T9 THIS LOCATION 

; EXAMI ACK TO FIND CAUSE 

: CTED TRAP TO THIS LOCATION 

EEE Mt ae THIS LOCATION 

thie ACK TO FIND CAUSE 

;UNEXPECTED TRAP TO THIS LOCATION 

; EXAM TACK TO FIND 

TO THIS LOCATION 


a we THIS LOCATION 


; EXAMINE STACK TO FIND CAUSE 
TRAP 19 THIS LOCATION 
* EXAMINE TACK TO FIND CAUSE 
: TRAP TO THIS LOCATION 
“EXAMINE STACK TO FIND CAUSE ani 
; BEnINe, STACK 70 at AUSE 
* UNE XPE: T9 THIS LOCATION 
EXAMINE STACK TO F 
UNEXPECTED TRAP TO THIS LOCATION 
;EXANI ACK TO FIND Batis 
TRAP T9 THIS LOCATION 
*EXAMINE STACK TO F 
*UNEXPECTED TRAP 79, THIS LOCATION 


; EXAM ee ND _CAUSE 
; UNE TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
;EXAM ACK TO FI 

TRAP TO THIS LOCATION 
t EXAMINE STACK TO 
; UNEXPEC TRAP Y THIS LOCATION 
; EXAM ACK TO FIND 
s UNE Ms TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 





DZOHH 
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000674 


BES eres Ses 
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000676 
000702 
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HO1 


3 Ree eo Ie ie of THIS LOCATION 
O_FIND CAUSE 

; UNEXPECTED TRAP Y THIS LOCATION 

; EXAMINE aS TO_FIND CAUSE 

sUNEXPECTED TRAP TQ THIS LOCATION 

s EXAMINE ACK TO FIND CAUSE 

iPan Te TRAP 19 THIS LOCATION 


TO_FIND 
9 THIS LOCATION 
;EXAN NE STACK TO FIND CAUSE 
CTED TRAP 19 THIS LOCATION 
Xan STACK TO FIND CAUSE 
XPEC LOCATION 


pest TRAP TO THIS LOCATION 
; EXAMINE i TO_FIND CAUSE 

; UNEXPECTED TRAP 9 THIS LOCATION 
;EXAMINE STACK TO FIND CAUSE 

; UNEXPECTED TRAP TO THIS LOCATION 
INE STACK TO FI 


2 


;EXAMINE STACK TO 

; UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO 

; UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO 

;UNEXPECTED TRAP TO THIS LOCATION 
; EXAMINE a BY FIND CAUSE 

; UNEXPEC TO THIS LOCATION 
;EXAMINE STACK T 

;UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO FIND 
;UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO FIND CAUSE 
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224 


. 2200 


ooo 


101 


;STANDARD INTERRUPT VECTORS 





a car I, wees 

FAPSRY SERVICE A HANDEER DISPATCH SERVICE 
30 SENHA HENOLER Of 

IMP START :G0 TO START OF PROGRAM 


;DEFINITIONS FOR TRAP SUBROUTINE CALLS 
POINTERS TO SUBROUTINES CAN BE FOUND STARTING 
sAT LOCATION *TRPTAB™ 


SCOPE =TRAP+Y ; SCOPE P5008, AND AND ITERATION HANDLER 
OCTASC=TRAP+Y ION 

oc loace Tey et Arig 

PRRRINTREPSY ORVERT oral TO OCTAL, CHECK LIMITS 
SAVOSP=TRAP+Y ar gir 4g 10" . 
RESOS=TRAP+Y seve RO-RS 

SCOPE 1=TRAP+Y ‘CHECK FOR FREEZE ON CURRENT DATA 


Fo SERRE OSES RRL OR Soe TR Cee Bao 





OZOHK =MACY1I 27(732) 
DZDHHS.P11 
372 001009 
373 
374 


01 12767 
TT: 
LiL 
boibe6 008067 
ies th x 
UL SUS 
Boios4 Go80e7 
Bo1bs 104401 
0010S0 abe7e7 
001054 001001 
0610S&6 O00404 
001060 032767 
001086 O0144S 
001070 012701 
001074 Ole70e 
001100 012703 
001104 010211 
001106 o0S0ie 
OBilie Desks 
001114 0201 
001120 001371 
OOlle2 104403 
00i1e% 014550 
01736 900300 
Doiise oo0770 
001134 013424 
001136 003 
001137 004 
001140 104403 

1i42 Ol 

1144 

1146 
001150 177776 
nthe 013402 
Oo1ies B10 
001156 016767 
001164 005267 
nay eed eats 7 
001174 1 
001176 005167 
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tats 


001000 


012236 
Olee32 
012300 


012272 


-=1000 


176770 START: 


176502 VECI: 
VECe: 


18: 


-BYTE 
-BYTE 


-BYTE 
-BYTE 


; PROGRAM Tee ton 
: INTERRUPTS 


Seeneeesan” aay 


—DDwD— 
M—-WW 


mae 
a 
g 





HSEY uP PROceSeon stack 


Sa re TEST START FLAG 
S COUNT 


ee Eas PO 


LEAR LAST ERROR PC 


naa INIIAL 2A TON FLAG 


IF NOT 
:FOR REINETIAL TATION’ 


;1F SWOO=1, GET NEW VECTOR 


AND CSR 


;RESTORE_TRAPCATCHER 
:IN FLOATING VECTOR AREA 


; INPUT ADDRESS OF DEVICE VECTOR 


MESSAGE “VECTOR ADDRESS-" 
CONVERT STRING TO OCTAL 


tHIGH” LIMIT 
I NOCATIONS- TO BE FILLED 
:NUMBER_ 0 OF LOCA 


TIONS 
SS OF DEVICE CSR 


eae sinh aete™ EE 


HIGH at IT 
: LOCATIONS TO eS FILLED 
NUMBER OF LOCA 


TIONS 


S OF SILO 
REGISTER HIGH BYTE 


+e 
He Pav arti FLAG 


By IT 











tet} 
— 
£o 


BSBSeRsReeReeeseEse 
BP BSUS 


oe 
Or 
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;CHECK FOR PROGRAM START AT SELECTED ADDRESS 


012767 000340 176566 BEGIN: MOV #340, PS LOCK OUT INTERRUPTS 
Oie706 o1546 MOV #STACK, SP *SET UP PROCESSOR STACK 
032767 oOo0002 176346 BIT #5W0!, SWR : 1=1 
001410 BEQ 15 GET PC FOR PROGRAM START 
104403 INSTR ‘GET P 
014736 MTSTPC “MESSAGE “TEST PC” 
40s FARAN :CONVERT STRING TO OCTAL 
017500 7500 
000207 RETURN 
001 .BYTE 1 
001 “BYTE 1 
10 BR 2s 
012767 001274 012170 1S: MOV 8T1,RETURN sNORMAL START, TEST 1 
7? 012220 TST STFLG IF LOOPING, BYPASS TYPEOUT 
001004 SNE 
005167 Ol12212 COM STFLG 
109401 014732 2S: TYPE MR sTYPE “R" TO INDICATE START 
000177 012146 38: IMP dRETURN :START TESTING 
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DZDHHB.Pil 


449 


Lol 


OZOHH 
DZDHHB. 


001274 


MACYL1 276732) 
Pil 


012767 


2 
104400 


Bib??? 
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000340 


0117le 
000000 
77777 


1 
014152 
000100 


133503 


100000 


000340 
000100 
001626 
004000 
011534 


000001 
77777 
14154 


176474 


012020 


012020 


011740 


Tl: 


1$: 


es: 


3$: 


4$: 


Te: 


1$: 


;ENABLE AUTO ECHO ON LINE 0 
: TRANSMIT ONE ice ON LINE 0 


MO 


SAT 9600 BALD 


BITS. 
SRECEIVE AND VERIFY CHARACTERS UNTIL 64 HAVE BEEN RECEIVED. 
SAFTER 64 CHARACTERS HAVE BEEN RECEIVED, DISABLE ALTO ECHO. 


“EXACTLY ONE MORE CHARACTER SHOULD BE RECEIVED. ° 
MOV sDISABLE ALL INTERRUPTS 
MOV $100, Fount -SET UP FOR 100 ITERATION 

MOV ESCAPE SET UP TO ESCAPE TO NEXT TEST 
MOV sBItli aDHSCR ;MASTER CLEAR INTERFAC 
JSR PC, CLRALL ‘CLEAR ALL BYTE COUNT A 

* BUS RODRESS REGISTERS 
MOV #0, IDHSCR SELECT LINE o 
MOV #-1,aDH sSET BYTE COUNT TO 1 
MOV #TWRDO, JDHBA ADDRESS OF CHARACTER TO BE TP awSMITTED 
MOV #100,R0 ier UP TO RECEIVE 64 CHARACTERS 
CLR *COUNT OF CHARACTERS RECEIVED 
MOV #133503, IDHLPR :SET UP SPEED FOR 9600 BAUD 
iB BITS PER CHARACTER, 
AUTO ECHO ENABLED GN LINE O 

MOV #1, JDHBAR :SET BAR BIT 0 
TSTB  aDHSCR SWAIT FOR CHARACT 
BPL 2$ RECEI 

INC Rl ‘UPDATE RECEIVED CHARACTER COUNT 
MOV JOHNRC, RY "READ CHARACTE 
CHP RY, THROO IS CHARACTER CORRECT 
MOV TWROO, RS ; (RS)SEXPECTED CHARACTER 
CLR QDHLPR :SHUT OFF AUTO ECHO 
HLT 0 ; CHARACTER CHOED INCORRECTLY 
BR 4 *RESTART TEST 
DEC RO ?IF 64 CHARACTERS HAVE NOT 
BGT E ‘BEEN RECEIVED, CONTINUE 
BIC #100000, JDHLPR sSHUT OFF BUTO-ECHO 
BR :GET 1 MORE CHARACTER 
SCOPE *CHECK FOR ITERATIONS, LOOP 


sENABLE AUTO ECHO ON LINE 1 
CHARACTER ON LINE 1 

aT 3600 BAU S. 

"RECEIVE AND VERIFY CHARACTERS UNTIL 64 HAVE BEEN RECEIVED. 

RETER. 64 CHARACTERS HAVE BEEN RECEIVED DISABLE AUTO ECHO. 

“EXACTLY ONE MORE CHARACTER SHOULD BE RECE 


#340,PS 

#100; ICOUNT 
#4$, ESCAPE 
#BIT11. JDHSCR 
PC, CLRALL 

#1, DHSCR 


#-1, IDHBC 
#TWRD1, JDHBA 





;DISABLE ALL INTERRUPTS 

;SET UP FOR 10 LTERATIONS 
SET UP TO ESCAPE TO NEXT TEST 
MASTER CLEAR INTERFACE 

CLEAR ALL BY M3 eeu NT _AN 

BUS ADDRESS REGISTERS 

; SELECT et 1 

:SET BYTE COU 

:SET UP RODRESS oF AHARACTER TO BE TRANSMITTED 


OZDHH 
OZDHHB .P 


ob} 


$11 


WIUITUNTUNUN UU 
02 b= bb 2 
WONWUI£C UT 


tat 


S23 


tity! 


Malai 27(732) 


Biss 


001544 


boeoh; 


012777 


012777 


042777 
000752 
104400 


012767 
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000100 
133503 


100000 


011642 


011642 


011562 


011464 


es: 


3$: 


4§: 


T3: 


1$: 


es: 


3S: 


B 
SCOPE 


;ENABLE AUTO ECHO ON LINE 2 


NOL 


| aa ie 
#133503, JDHLPR 
#2, JDHBAR 
@DHSCR 

e$ 


RI 
JOHNRC, RY 
PY, TWROL 


aca tate 





4 ACT 
Sy RES cane 
UP SPEED FOR 9600 BAUD 
ty errs ti CHARACTER, 
5 AU 0 ECHO ENABLED ON’LINE 1 
;SET BAR BIT FOR LINE 1 
sWAIT F Ry HARACTER TO 


: UPDATE RECEIVED CHARACTER COUNT 
READ CHARACTE 
1S CHARACTER CORRECT 


; (RS)=EXPECTED CHARACTER 


SHUT OFF AUTO EC 
; CHARACTER ECHOED INCORRECTLY 
;RESTART TEST 

;1F 64 CHARACTERS HAVE NOT 
;BEEN RECEIVED, CONTINUE 


;SHUT OFF AUTO-ECHO 
;GET 1 MORE CHARACTER 
CHECK FOR ITERATIONS, LOOP 


ars ont ene a ie ON LINE 2 
;RECEIVE AND VERIFY CHARACTERS UNTIL 64 HAVE BEEN RECEIVED. 


: AF 


#340,PS 
#100; ICOUNT 
#4$, ESCAPE 
#BIT11, SDHSCR 
PC, CLRALL 
#2, IDHSCR 
#-1, JDHBC 
#TWRD2, JDHBA 
#100, RO 
#133503, IDHLPR 


#4 ADHEAR 
apiick 


R 
JDHNRC, RY 
, THRO2 


TWRD2, RS 
JDHLPR 


RO 


TER 64 CHARACTERS HAVE BEEN RECEIVED ae AUTO ECHO. 
EXACTLY ONE MORE CHARACTER SHOULD BE RECEIVE 


;DISABLE ALL fot 

SET UP FOR 100 ITERATIONS 
:SET UP TO ESCAPE TO NEXT TEST 
; ERFACE 


;CLEAR ALL B UN 
;BUS ADDRESS ISTERS 
; SELEC ae 

SET BYTE COUN 


TO 1 
;SET UP RobRESS OF CHARACTER TO BE TRANSMITTED 
SET UP TO RECEIVE 64 CHARACTERS 

COUNT OF CHARACTERS RECEIVED 

;SET UP SPEED FOR 9600 BALD 


HARACTER, 
NABLED ONLINE 2 
FOR L SS 


1S CHARACTER CORRECT 


;(RS)SEXPECTED CHARACTER 
:SHUT OFF AUTO ECHO 
CHARACTER ECHOED INCORRECTLY 
‘RESTART TEST 

TIF 64 CHARACTERS HAVE NOT 





SBOP REE Baked Tlad talede te ote aes eke 


uy 
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O01770 003357 BT 2 ;SEEN RECEIVED, CONTINUE 
O0177e 100404 BNI «§ | 

O01774 ONe7?7 100000 O11404 BIC #100000, 2DHLPR ;SHUT OFF AUTO-ECHO 
Ocz002 007s2 R ;GET 1 MORE CHARACTER 
O03004 104400 4s: SCOPE {CHECK FOR ITERATIONS, LOOP 


sENABLE AUTO ECHO ON LINE 3 
[TRANSMIT ONE CHARACTER ON LINE 3 
SAT 9600 BAUD, 8 BITS. 

TRECEIVE AND VERIFY CHARACTERS UNT 


IL 64 HAVE BEEN RECEIVED. 
TAFTER 64 CHARACTERS HAVE BEEN RECEIVED, DISABLE AUTO ECHO. 
EXACTLY ONE MORE CHARACTER SHOULD BE RECEIVED. 
002006 012767 000340 175762 TH: MOV #340,PS ;DISABLE ALL INTERRUPTS 
902014 ler? 000100 011426 MOV 8100; ICOUNT :SET UP FOR 100 ITERATI 
O02022 0127&7 O0= ibe 011414 MOV 84S, ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
092030 912777 000 O11344 MOV s8ITI1, DOHSCR :MASTER CLEAR INTERFACE 
002036 O04767 011200 18: JSR PC, CLRALL 2 ALL BYTE COUNT AN 
poenie 012777 999003 011332 MOV 83, SOHSCR ;8US eT tite pease 
002056 bis 514160 Bi t33] MOV alae SOHBA eer UP Specs oF buARACTER TO BE TRANSMITTED 
002054 petra 000100 #100,R0 SET UP FO RECEIVE 64 ¢ 
002070 o0S001 CLR Rl :COUNT OF CHARACTERS RECEIVED 
002072 012777 133503 011306 #133503, IDHLPR SET up FOR 9600 BAUD 
*8 BITS CHARACTER, 
AUTO ECHO ENABLED ONLINE 3 
002100 012777 000010 011306 MOV $10, IDHBAR :SET BAR BIT FOR LINE 3 
902106 105777 011270 23: TSTB  SDHSCR *WAIT FOR CHARACTER TO 
O0e112 100375 2s *BE RECEIVED 
002114 005201 INC Rl [UPDATE RECEIVED CHARACTER COUNT 
002116 017704 011262 MOV SOHNRC, RY READ CHARACTER 
One! 7? Ol203e CMP R4, TWROS *IS CHARACTER CORRECT 
002126 001406 BEQ 3$ 
002130 016708 012024 MOV TWRO3, RS ; (RS)=EXPECTED CHARACTER 
002134 011246 CLR BDHLPR *SHUT OFF AUTO ECHO 
002140 104000 HLT 0 °C TER ECHOED INCORRECTLY 
002142 000407 BR 4g RESTART TEST 
002144 005309 3S: DEC RO IF 64 CHARACTERS HAVE NOT 
902146 ? BGT 2s :BEEN RECEIVED, CONTINUE 
002150 100404 = BMI 48 
O0ei52 042777 100000 011226 BIC #100000, JDHLPR ; SHUT OFF AUTO-ECHO 
002169 000752 BR >GET 1 MORE CHARACT 
002162 104400 4S: SCOPE “CHECK FOR ITERATIONS, LOOP 
;ENABLE AUTO ECHO ON LINE 4 
TRANSMIT ONE CHARACTER ON LINE 4 
"AT 9600 BAUD, 8 BITS. 
“RECEIVE AND VERIFY CHARACTERS UNTIL 64 HAVE BEEN RECEIVED 
“AFTER 64 C TERS HAVE BEEN RECEIVED, DISABLE AUTO ECHO 
“EXACTLY ONE MORE CHARACTER SHOULD BE RECEIVED. 
poe1es 012767 O00340 175604 TS: MOV 8340, PS sDISABLE ALL INTERRUPTS 
b0e17¢ 012767 000100 011250 MOV #100 COUNT *SET UP FOR 100 ITERA 
012767 002340 011236 MOV 84$.6 -SET UP TO ESCAPE TO NEXT TEST 
002206 012777 OO4000 011166 MOV #81111, DHSCR :MASTER CLEAR INTERF 
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021022 
00C004 
ERE 

14162 
000100 


133503 


oo oO 
=e G2 hs 
o~-9—= —pP- 


100000 





COe 


PC, CLRALL 


#4, IOHSCR 
#-1, SOHBC 
#TWRDY. DOHBA 
#100,R0 


1 
8133503, IDHLPR 
820, JOHBAR 
SDHECR 


RI 
@OHNRC, RY 
RY, TWROY 


ag 


;CLEAR ALL BYTE COUNT AN 
;BUS ADORESS REGISTERS 
{SELECT LINE 4 


sSELECT LI 
;SET BYTE COUNT 
; UP AD 


DEWMDOMNOWWw 
mp 


mc mMmomMmm@mm 


: CHARAC 
!RESTART TEST 
TIF 64 C 


GET 1 MORE 


; CHARACTER 
;CHECK FOR ITERATIONS, LOOP 


Bae 


ai a 
=P SERS 
ii an 
= ane 
a RuS"R 
3 oi 
a B 





TO 1 
DRESS OF C 


HARACTER TO BE TRANSMITTED 
UP TO RECEIVE S4 CHARACTERS 


a 
EB 
m 
z 
e 

= 
g 
S 


;READ CHARACT 
31S CHARACTER CORRECT 
3 OS sere TED CHARACTER 
;SHUT OFF AUTO ECHO 
TER ECHOED INCORRECTLY 

64 CHARACTERS HAVE NOT 
;BEEN RECEIVED, CONTINUE 
;SHUT OFF AUTO-ECHO 


A 
a 


: 
- 
5 
2 


S 
h 
; 
a 
z 


VED 
F RLEPIVED CHARACTER COUNT 
; CHARACTER 
31S CHARACTER CORRECT 








~ 


Batotde 


& 


SOIR SERS BE SRR LOMB BB SRR Paes 


a ee ee ee ee ce ce ee ee ee ee ee ne 


aussensgnemeinermmntiaaniunaiins 


NX 
~- 
© 


Ry epererereteretetey 
Ce en oe ee oo 
—OWONOUI£ wre 


DOe 


MACYIL e7(732) e8-SEP-76 15:23 PAGE 158 


OC2464 O16705 011474 MOV TWRDS, RS : (RS) =EXPECTED CHARACTER 
70 010712 CLR JOHLPR ‘SHUT OFF AUTO 
74 104 . HLT 0 t CHERACTER ECH 6 INCORRECTLY 
002476 O00407 BR 4g “RESTART TEST 
902509 38: DEC RO SIF 64 CHARACTERS HAVE NOT 
BGT 23 BEEN RECEIVED, CONTINUE 
00404 QM] ug 
2777 100000 o1067e2 BIC #100000, JDHLPR SHUT OFF AUTO-ECHO 
002514 000752 6R 2s :GET 1 MORE CHARACTER 
002516 104400 4g; SCOPE *CHECK FOR ITERATIONS, LOOP 


; ENABLE are ECHO ON LINE 6 
; TRANSMIT ONE CHARACTER ON LINE 6 


:AT 3600 BAUD 
RECEIVE AND VERIFY CHARACTERS UNTIL 64 HAVE BEEN RECEIVED 
AFTER 64 AO AraC CTERS HAVE BEEN RECEIVED, DISABLE AUTO ECHO 
EXACTLY ONE MORE CHARACTE BE RECEIVED. 
002520 012767 900340 175250 17: MOV #340, PS ;DISABLE ALL INTERRUPTS 
002526 012767 000100 010714 MOV 8100; ICOUNT *SET UP FOR 100 ITERATIONS 
002534 Ole767 O0ce674 010702 $, ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
002542 012777 OO04000 010632 MOV #8ITI1, SDHSCR “MASTER CLEAR INTERF 
002550 004767 O1046S 13: ISR PC, CLRALL CLEAR ALL BYTE COUNT AN 
* BUS SS REGISTERS 
002554 012777 000006 010620 MOV #6, IDHSCR >SELECT LINE 6 
002562 012777 1 010622 v s-! -SET BYTE COUNT TO 1 
002570 012777 O14166 010612 MOV 8TWRDG, DOHBA :SET UP ADORESS OF CHARACTER TO BE TRANSMITTED 
902576 O1e700 1 #100,R0 SET TO I gH TER 
1 CLR : OF CEIVED : 
002604 012777 133503 010574 NOV #133503, IDHLPR :SET UP SPEED FOR 9600 BAUD 
AAU Sap Cakes BF ae 6 
012777 000100 010574 MOV $100, JDHBAR eer BAR BIT FOR LINE 6 
105777 010556 2s: TSTB = ADHSCR WAIT FOR CHARACTER TO 
1 sits ' ft i PORTE AEP ven CHARACTER COUNT 
017704 O105S0 MOV JOHNRC, RY : CHARACTER 
De0us Hb? 011326 CHP RY, THRDE 1S CHARACTER CORRECT 
016705 011320 MOV TWRDG,RS ;(RS)=EXPECTED CHARACTER 
005077 010534 CLR JDHLPR i SHUT OFF AUTO ECHO 
104000 HLT 0 *CHARACTER EC INCORRECTLY 
000407 BR 4§ SRESTART TEST 
005309 3S: DEC RO IF 64 CHARACTERS HAVE NOT 
BGT 2s ;BEEN RECEIVED, CONTINUE 
100404 BMI 4§ 
042777 100000 010514 BIC #100000, IDHLPR ;SHUT OFF AUTO-ECHO 
000752 BR *GET 1 MORE CHARACTER 
104400 4g: SCOPE *CHECK FOR ITERATIONS, LOOP 





SEO AUTO ECHO ON LINE 7 
; TRANSMIT ONE CHARACTER ON LINE 7 
;AT 9600 BAUD 


BED a Geer EES WLS IL EEP E. 


;EXACTLY ONE MORE CHARAC SHOULD BE RE 
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730 
ras GBR GLE? ee ree ye an eee 
re ried 15282 q DiDees HOY seit] CPE on St R gg RO * ho 
o32 7 767 aioe iS: JSR CLRADL HATE ALL BYT WTEC 
736 BUS RODRESS REG! 
ce OE WT OI plese yt En Sut 1 
} 4170 O10434 MOV rTAAt, JDHBA :SET HARACTER TO BE TRANSMITTED 
533 pee pieces enya MOV o0,RO iSET Up UP Pree | cH aeHoRACTERS 
741 002760 005001 CLR Rie :C OF - CHARAC TED can 
oe 002762 912777 1335032 010416 MOV #133503, IDHLPR :SE UP 
i tButD ECHO. ae INE 7 
745 002770 012777 o000200 O10416 MOV 8200, IDHBAR :SET BRR orf FOR CIN 
ob 002776 105777 010409 2s: STB SeHSeR ‘WAIT FOR CHARACTER TO 
aire e 
748 O0300 ipesre : rE he IVED CHARACTER COUNT 
749 003006 017704 010372 MOV RY *READ CHARAC 
750 002012 O204%67 011152 MP R4, THRDZ ?IS CHARACTER CORRECT 
751 003016 001406 BEQ 3$ 
752 O1670S 011144 MOV TWRD?, RS ; (RS)SEXPECTED CHARACTER 
753 003004 005077 010356 CLR JDHLPR ; SHUT OF OFF AUTO ECHO 
| 754% 003030 104000 T 0 *CHARACTER ECHOED INCORRECTLY 
755 003032 000407 BR 4S RESTART TEST 
756 003024 005300 3s: DEC RO IF 64 CHARACTERS HAVE NOT 
| 757 O0305. 003357 BGT 2s ;BEEN RECEIVED, CONTINUE 
| 7B 90304. 100404 4 
Le Be 30e5 ees —~ BR” 5s canneries SUT OOORE CHARACTER 
| 7e1 oos0se 10400 4S: SCOPE 'CHECK FOR ITERATIONS, LOOP 
| 73 sENABLE AUTO ECHO ON LINE 10 
| 764 “TRANSMIT ONE CHARACTER ON LINE 10 
| 265 AT 9600 BAUD g BITS 
| $85 SRECEIVE AAD VERIEY CHARACTERS UNTIL G4 HAVE. BEEN RECEIVED. 
| 768 “EXACTLY ONE MORE CRARACTERS BE Rech Hvebe 
| 770 003054 012767 O00340 174714 T1l: MOV 340, PS sDISABLE ALL INTERRUPTS 
| 771 003062 012767 0001 610360 MOV #100, ICOUNT SET UP FOR 100 TERATIONS 
77 093070 Oie?6? 010346 HOV $f SET UP TO E P 0 NEXT TEST 
57% posi tees Boas = 1S: JSR Pe — SOTERA ALL aire 
| 975 "BUS ADDRESS REGISTERS 
| FF BHD OT Cee Blase HOV EEE TE COUNT TO 1 
| 778 003124 012777 O14172 010256 MOV #TWRDIO, JDHBA -SET UP ADDRESS oF CHARACTER TO BE TRANSMITTED 
| 773 003132 01 050100 MOV 100,RO SET UP TO RECEIVE 64 CHARACTERS 
| 780 136 CLR 1 *COUNT OF CHARAC RECEIVED 
7B) 003!40 012777 133503 010240 NOV #133503, IDHLPR iSET UP SPEE D D FOR 9600 BAUD 
| 783 ‘Auto Ech ENABLED ONLINE 10 
| 784 003146 012777 400 010240 MOV #400, SDHBAR :SET BAR BIT FOR LINE 10 
| 785 O03Is4 105777 O10e22 2s: TSTB = ADHSCR WAIT FOR CHARACTER TO 
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010214 

010776 

010770 

010200 

100000 010160 
000340 174536 
000100 g10¢0e 
003406 910170 
CO4000 010120 
000011 010106 
EAE ot 1 

14174 0101 

000100 

133803 010062 
001000 010062 
010044 

010036 

010622 

010614 

0100¢e 

100000 010002 


38: 


4§: 


Tle: 


1S: 


BPL 2$ 
INC Ri 

MOV JOHNRC, RY 

CMP RY, TWROLO 
BEQ 3 

MOV TWRD1O,RS 

CLR JDHLPR 

HLT 0 

BR 4 

DEC RO 

BGT 2s 

SMI 4§ 

BIC #100000, JDHLPR 
BR 2s 

SCOPE 


; ENABLE wre ECHO ON LINE 11 
s TRANSMIT BA 8 Bit 


;BE RECEIVED e 
:UPDATE RECEIVED CHARACTER COUNT 
;READ CHARACTER 

:1S CHARACTER CORRECT 


5 US aarp CHARACTER 
; SHU HUT OFF AUTO ECHO 
| ATER eeoed INCORRECTLY 


s RESTART 
:IF 64 CHARACTERS HAVE NOT 
BEEN RECEIVED, CONTINUE 


;SHUT OFF AUTO-ECHO 
;GET 1 MORE CHARACTER 
;CHECK FOR ITERATIONS, LOOP 


ON LINE 11 


ETE A 


SEXACTLY ONE NORE. CHARAC 


ann #340,PS 
MOV #100; ICOUNT 
MOV 84$, ESCAPE 
MOV sBITI1, DOHSCR 


ISR PC, CLRALL 
MOV #11, 0HSCR 
MOV “ 
ry OMOOLAD 
CLR Rt : 
MOV #133503, JDHLPR 
MOV #1000, 2OHBAR 
TSTB §SDHSCR 
BPL 2g 
INC Rl 
MOV JDHNRC, RY 
CHP R4, TROLL 
MOV 70RD11,RS 
CLR PR 

T 0 

4§ 

DEC RO 

T 2s 

I 4§ 
BIC #100000, 20HLPR 
ECope 


;ENABLE AUTO ECHO ON LINE le 





Y FY chanacrERs UNT 


T OP ROoRESS OP duARACTER TO BE TRANSMITTED 
Saf a caeabe eel 
LBS ie 
iuety Fe ren ANARACTER TO 
iboats ce VED CHARACTER COUNT 
31S CHARACTER CORRECT 

;(RS)=EXPECTED CHARACTER 
:SHUT OFF AUTO ECHO 
; i RUCRART TEST INCORRECTLY 
;IF 64 CHARACTERS HAVE NOT 
;BEEN RECEIVED, CONTINUE 


;SHUT OFF AUTO-ECHO 


itd FOR ITERATIONS, LOOP 


; 
; 
; 
; 
; 
; 
; 
; 
$ 
’ 
; 
;SET 
9 
’ 











aT SOD BAUD ONE ere ON LINE 12 


EYEL’Es MSAARPE He GEEN Wecetved, ‘BUGABCE aDtO°EC58. 


EXACTLY ONE MORE CHARACTER SHOULD BE RECEI 


12767 40 174260 T1123: as iQI ABLE ALL INTERRUPTS 
biSee7 B03100 1obe4 HOV fi00'T TGount is UP FOR 100 ITERA ONS na 
Bigeg? Rages MOV wis FSCaP JDHSCR sa “pte CINEREA - 

003440 004767 007576 1S: ISR PC, CLRALL 
: ER opRESe VREGisvers 
012777 000012 007730 MOV #12, DDHSCR ievPety T LINE 1 
biS999 b141 7% ee NOV rite JDHBA tee fy AupRACT R 10 BE TRANSMITTED 
b1e700 000100 HOV 00,R0° i Ue Up Pee | y act RCTE S 
Beye 133503 007704 MOV #133503, IDHLPR cer UP OEPEED FO FOR oe 
:8 BITS PER CHARACTER, 
*AUTO ECHO ENASLED ONLINE 12 
012777 o02000 007704 MOV #2000, JDHBAR :SET BAR BIT FOR LINE le 
105777 007665 2s: TSTB § aDHSCR WAIT FOR CHARACTER TO 
100375 BPL 2s *BE RECEIVED 
005201 INC Rl :UPDATE RECEIVED CHARACTER COUNT 
017704 007660 MOV JOHNRC, RY READ CHARACTER 
O1O446 cH RY, TWROL2 IS CHARACTER CORRECT 


36 Te ey a Se OACTER 


; : CHARACTER aa INCORRECTLY 
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BR sRESTORT TES 
3S: DEC RO IF 64 CHARACTERS HAVE NOT 
BGT = *BEEN RECEIVED, CONTINUE 
100000 007624 BIC #100000, JDHLPR ;SHUT OFF AUTO-ECHO 
BR 2s MORE CHARAC 
104400 4g; SCOPE *CHECK FOR ITERATIONS, LOOP 
; AUTO E 
TRANSIT ONE GRRRBCTER ON ON PINE 13 
RECEIVE. BND VERIEY CHARAC y EIVED 
: 4 C qa HAVE BEER Ree By veo, "Br SAGE ALTO ECHO: 
“EXACTLY ONE MORE CHARACTER SHOULD BE Rect 
003566 012767 174202 T14: MOV ;DISABLE ALL INTERRUPTS 
12767 990109 46 *SET UP FOR RATIONS 
12767 :SET ie TO 0 NEXT TEST 
003610 01 4 MOV : I 
| 003616 004767 007420 1S: JSR sett bic CLEAR ALL hale 
| 003630 O1e777 7777? Gorse NOV #1 SDH | T BYTE i 
Ol 4200 007544 MOV #TWRD13, IDHBA : SET BS Eosrecs oF OF duaracTER TO BE TRANSMITTED 
| 12700 100 MOV #100, RO >SET UP TO RECEIVE 64 CHARACTERS 
| 003650 005001 CLR RI ‘COUNT OF CHARACTERS RECEIVED 
| 
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007526 


007526 


007446 


HO02 


MOV #133503, IDHLFR SET UP SPEED FOR 9600 BAUD 
*B BITS PER CHARACTER, 
“AUTO ECHO ENABLED ON LINE 13 
MOV #4000, JDHBAR SET BAR B LI 
2s: TST8 § JOHSCR WAIT F TE 
BPL BE RECE 
INC Ri : UPDAT CHARACTER COUNT 
MOV JOHNRC, RY *RE 
CHP RY, THROL3 "IS CHARACTER CORRECT 
NOV TWRD13, RS (RS)= EXPECTED CHAR CHARACTER 
HLT 0 Balt ER'be RoeD iNCORRECTLY 
BR 4g ;RESTART TEST 
3S: DEC RO ‘IF 64 CHARACTERS HAVE NOT 
BGT es "BEEN RECEIVED, CONTINUE 
BIC #100000, 2DHLPR sSHUT OFF_AUTO-ECHO 
BR :GET 1 MORE CHARACTER 
4g: SCOPE :CHECK FOR ITERATIONS, LOOP 
; ENABLE AUTO ECHO ON LINE 
TRANSMIT ONE CHARACTER ON LINE 14 
*AT 9600 BAUD, 8 BITS. 
*RECEIVE AND VERIFY CHAR IL 64 HAVE BEEN RECEIVED. 
AFTER 64 CHARACTERS HAVE BEEN RECEIVED, DISABLE AUTO ECHO. 
“EXACTLY ONE MORE CHARACTER SHOULD BE RECEIVED. 
TIS: MOV #340,PS ;DISABLE ALL INTERRUPTS 
MOV #100, ICOUNT :SET UP FOR 100 ITERATIONS 
MOV #4$. ESCAPE *SET UP TO ESCAPE TO NEXT TEST 
- HOV SBITT1, SDHSCR ;MASTER CLEAR INTERFACE 
‘ote AoDRESS REG S 
MOV #14, SDHSCR >SELECT LINE 14 
MOV #-1' IDHBC SET BYTE COUNT TO 1 
MOV #TWRO14, DDHBA *SET UP ADDRESS OF CHARACTER TO BE TRANSMITTED 
MOV #100, RO -SET UP TO RECEIVE 64 CHARACT 
CLR Ri °C OF CHARACTERS RECEIVED 
MOV #133503, IDHLPR :SET UP SPEED FOR 9600 
18 BITS PER CHARACTER, 
*AUTO ECHO ONLINE 14 
MOV #10000, 2D4BAR “SET BAR BIT FOR LINE 14 
2s: TSTB @DHSCR WAIT FOR ; 0 
BPL 2s *BE RECEI 
INC Ri ; UPDATE RECEIVED CHARACTER COUNT 
MOV JOHNRC, RY READ 
CHP RY, THROL IS CHARACTER CORRECT 
MOV TWRO14, RS ;(RS)=EXPECTED CHARACTER 
CLR SHUT OFF AUTO ECHO 
HLT 0 ; CHARACTER ECHOED INCORRECTLY 
BR 4§ RESTART TES TEST 
38: DEC RO IF 64 CHARACTERS HAVE NOT 
BGT e3 ‘BEEN RECEIVED, CONTINUE 
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004110 042777 190000 9007270 Bic #100000, JDHLFR ;SHUT OFF gh bet oe. 
004116 0007Se BR es ;GET 1 MORE CHARACTER 
004120 104400 48: SCOPE CHECK FOR ITERATIONS, LOOP 


;ENABLE AUTO ECHO ON LINE 15 
STRANSMIT ONE CHARACTER ON LINE 15 


iB 
HARACTERS UNTIL 64 HAVE BEEN RECEIVED. 


RECEIVE AND VERIFY 
IETF NE TA EEA ecb BRE TO ECHO 


OO04i22 012767 OOO34O 173646 T16: MOV #340,PS ;DISABLE ALL INTERRUPTS 
004130 12767 000100 007312 MOV #100; ICOUNT :SET UP FOR 100 ITERATIONS 
136 Ole767 004276 007300 MOV #4S, ESCAPE *SET UP TO ESCAPE TO NEXT TEST 
004144 012777 OO4000 007230 MOV seitii JDHSCR *MASTER CLEAR INTERFACE 
004152 004767 007064 1S: JSR PC, CLRALL “CLEAR ALL BYTE COUNT AN 
“BUS ADDRESS REGISTERS 
004156 012777 000015 007216 MOV #15, IDHSCR *SELECT LINE 15 
004164 012777 177777 007220 MOV #-1' IDHBC jBET BYTE COU COUNT TO 
Oov172 Ole77? 14204 007210 nov BTHROIS, aOHEA ;SET RODRE SS OF CHARACTER To. BE TRANSMITTED 
004 1 CLR Ril ’ ‘Safe CHERECTERS RECEIVED. 
004206 012777 133503 007172 MOV #133503, IDHLPR SET UP SPEED FOR 
iB IT FER” 
CHO ENABLED ONLINE 15 
004214 012777 O20000 007172 MOV #20000, SDHBAR set BAR BIT FOR LINE 15 
105777 007154 2s: TSTB §JDHSCR WATT FOR /GHPRACTER TO 
004226 100375 BPL 2s 
go5201 INC Ri DPOATE.ReceTy CHARACTER COUNT 
1 007146 MOV JOHNRC, RY * RE 
004236 De0467 2 CHP RY, TWROIS iF PR UBRACTER CORRECT 
bie 70s 007734 V WRO1S,RS ; (RS)=EXPECTED CHARACTER 
007132 CLR R *SHUT OFF AUTO ECHO 
2S4 194000 HLT 0 *CHARACTER ECHOED INCORRECTLY 
BR 4g sRESTART TEST 
004260 005300 3S: DEC RO IF 64 CHARACTERS HAVE NOT 
004262 003397 BGT es “BEEN RECEIVED, CONTINUE 
266 042777 100000 007112 BIC #100000, 3DHLPR ; SHUT OFF AUT®-ECHO 
004274 900752 BR 23 :GET 1 MORE CHARACTER 
004276 104400 


4S: SCOPE i Check FOR ITERATIONS, LOOP 


tA ch 000340 173470 T17: MOV #340,PS 


C ALL BYTE COUNT AN 
;BUS ADDRESS REGISTERS 


SEIRRSER CEE SER EER COEUR COR Baa ol sansa aCe EOE NS 


oe ee ee oo oe ee ee ee 
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1010 334 012777 000016 007040 MOV HG, JOHSCR -SELECT LINE 16 
1011 OO4342 O1e777 177777 O07042 MOV JOHBC -SET BYTE COUNT TO 1 
1012 004350 Ole777 014206 007032 MOV rTHAD LG, SDHBA ‘SET UP ADORESS OF CHARACTER TO BE TRANSMITTED 
10i3 004356 Ole700 000100 MOV #100,R0° -SET UP TO RECEIVE 64 CHARACTERS 
1014 004262 005001 CLR Ri ‘COUNT OF CHARACTERS RECEIVED 
1015 OO4364 012777 133503 007014 MOV #133503, IDHLPR SET UP SPEED FOR $500 BAUD 
1016 ‘8 R CHARACT 
101 “AUTO ECHO ENABLED ON’LINE 16 
1018 004372 012777 O40000 007014 MOV #40000, JDHBAR ‘SET BAR BIT FOR LINE 16 
1019 Oo4400 105777 006776 23: TSTB JDHSCR WAIT FOR CHARACTER TO 
1020 OO4404 100375 BPL 2g *BE RECEIVED 
1021 005201 INC Rl ‘UPDATE RECEIVED CHARACTER COUNT 
1022 004410 017704 006770 MOV JOHNRC, RY *READ CHARAC 
1023 OO4414 O20467 007566 CMP RY, TWROLG 1S CHARACTER CORRECT 
1024 OO4420 001406 BEQ 
1025 O04422 016705 007560 MOV TWRD16, RS : (RS)=EXPECTED CHARACTER 
1026 OO4426 005077 006754 CLR SDHLPR :SHUT OFF AUTO 
1027 OO04432 104000 HLT 0 *CHARACTER ECHOED INCORRECTLY 
1028 004434 000407 BR 4g RESTART TEST 
1029 004436 005300 3S: DEC RO IF 64 CHARACTERS HAVE NO 
1030 OO4440 003357 BGT 2s “BEEN RECEIVED, CONTINUE 
1031 oo4442 100404 BMI 4g 
1032 042777 100000 006734 BIC #100000, 2DHLPR sSHUT OFF AUTO-ECHO 
1033 oo44se 000752 BR 2s GET 1 MORE CHARAC 
1034 104400 4g: SCOPE :CHECK FOR ITERATIONS, LOOP 
1036 Rss AUTO ECHO ON LINE 17 
1037 TRANSHIT ONE ONE CHARACTER ON LINE 17 
1 AND FY CHARACTERS UNT CEIVED. 
1biG Du Peseta Hee gEEN Rec RECEIVED, Bt AUTO ECHO. 
1042 
1043 OO44S6 012767 O00340 173312 T20: at ease? pane pie INTERRUPTS 
| 1044 OO4464 Ole76? 000100 006756 HOV #100 COUNT ie! uP FOR 100 ITERATIONS 
: thu Boucos Bt ppapes Bpeery y res a ea RATER CLEAR INTERCACE 
| 1047 004506 004767 006530 18: JSR PC, CLRALL 3CL COUNT AN 
ins 004512 012777 000017 OD06b62 MOV 47, QOHSCR >SELECT L 
| 050 004520 012777 177277 006664 MOV ” JOHBC :SET i foots 79 4 
| 1051 Ooveb b1e777 b14e10 006654 MOV trun QDHBA SET UP SS OF CHARACTER TO BE TRANSMITTED 
| 1052 1 I MOV #100 *SET UP TO RECEIVE 64 CHARACTERS 
| 1053 bows4O 005001 CLR Ri : COUNT CHARACTERS RECEIVED 
(1054 Ol 133503 006636 MOV ———— jSeT UP SPEED FOR 9600 BAUD 
| 4055 :8 BI TS PER CHARACTER, 
| 1058 AUTO E NABLED ONLINE 17 
| 1057 OQO4SSO 012777 100000 006636 MOV #100000, JDHBAR :SET BAR BIT FOR LINE 17 
| 3058 o04sS6 105777 2s: TSTB §3DHSCR “WAIT FOR CHARACTER TO 
1058 OowSbe 100375 BPL ; BE RECEIVED 
ce & 005201 INC 1 *UPDATE RECEIVED CHARACTER COUNT 
| 1061 004566 017704 onb612 MOV JOHNRC, RY "READ CHARACTER 
is Ber 7 O074le2 cH RY, TWROL7 "IS CHARACTER CORRECT 
is (3 007404 MOV WRO17,RS ;(RS)=EXPECTED CHARACTER 
| 1065 004604 005077 006576 CLR SDHLPR *SHUT OFF AUTO ECHO 
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100000 


006556 


006464 


DoesHs 


3$: 


4$: 


Tel: 


1$: 


4§: 


KO0e2 





at $ earee “we INCORRECTLY 
F eqn RACTERS HAVE NOT 
Bet : fiat R suena Zon NUE 
PR HUT OFF AUTO-ECH 
Ge sfooooo ao EY" 1 HORE. CHARACTER 
SCOPE CHECK FOR ITERATIONS, LOOP 


; 1RANSMIT A BINARY COUNT PATTERN ON ALL LINES EXCEPT LINE O 
TRANSMIT 1 CHARACTER ON LINE O WITH AUTO ECHO ENABLED 
TRANSMISSION SPEED FOR ALL LINES IS 9600 BAUD 
;CHARACTER LENGTH IS 8 BITS 
VERIFY THAT CORRECT DATA IS RECEIVED ON ALL LINES 


;DISABLE ALL INTERRUPTS 


MOV tid. O SUNT *SET UP FOR 10 ITERATIONS 
MOV #5$’ ESCAPE :SET UP TO OTESCAPE TO NEXT TEST 
MOV sBItii JOHSCR “MASTER CLEAR INTERFACE 
JSR PC, SETALL ;SET UP ALL LINES TO TRANSMIT 
:400 (OCTAL) CHARAC 
MOV #0, JOHSCR SELECT LINE 0 FOR TESTING 
MOV #TWRDO,3DHBA = ; CHARACTER TO BE TRANSMITTED 
50N LINE O IN AUTO ECHO MODE 
MOV *TRANSMIT ONLY 1 CHARACTER ON LINE 0 
MOV ni 38803 9 JDHLPR SET RUTO ECHO FOR LINE O 
BIC LINACT ;CLEAR LINE ACTIVE BIT 
MOV $-1 2OHBAR sSET BITS FOR ALL LINES 
CLR *KEEP COUNT OF NUMBER OF RECEIVED CHARACTERS 
MOV SOHINRC, RY GET A CHARACTER FROM SILO 
BPL 1$ :IF NOT VALID DATA, TRY AGAIN 
MOV RY, Ra “EXTRACT LINE NUMBER FORM CHARACTER 
BIC #177760,R3 CLEAR STATUS BITS 
V R3,Re 
ASL R2 
CMP R3, #0 ;IF LINE NUMBER IS 0 
BEQ 4§ sCHECK FOR CORRECT ECHOED CHARACTER 
cH RBUF (R2) , R4 :IF NOT LINE 0, CHECK DATA 
MOV RBUF (R2), RS ;(RS)SEXPECTED NON ECHOED DATA 
HLT i. *NON ECHOED DATA ERROR 
INCB RBUF(R2) ; UPDATE CTED RECEIVED DATA 
BNE 1$ >CONTINUE IF NOT DONE 
BIC LINBIT(R2) ,LINACT CLEAR ACTIVE BIT 
st LINACT bate LINES ARE DONE 
N #0 CR 
BIC LODO SOHLPR er Tb ENE EPHO FOR LINE 0 
TSTB i CET REST OF CHARACTERS 
o 
INC RO ;UPDATE ECHOED CHARACTER COUNT 
CMP RY, TWRDO *CHECK ECHOED DATA 
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1122 O0S062 016705 007064 MOV TWROO, RS (RS) =EXPECTED ECHOED DATA 
lle3 005066 104002 HLT 2 sECHOED bata 
i124 005070 104490 S$: SCOPE : CHECK FOR TTERATIONS, LOOP 
1126 s TRANSMIT A BINARY COUNT PATTERN ON ALL_LINES EXCEPT LINE 1 
11g? + TRNeH it? HORACT : oe, LINE WITH br ECHO EN Beh 
ll : TRANSM MISSION SPE EINES Is 3 
1129 : CHARACTER CENeTHE re # i 
1130 "VERIFY THAT CORRECT DATA IS RECEIVED ON ALL LINES 
1132 005072 012767 O00340 172676 Tee: MOV #340 PS sDISABLE ALL INTERRUPTS 
1133 005100 012767 000010 o06342 MOV , {COUNT ise! UP FOR 40 TERATIONS 
1134 005106 O12767 005326 006330 MOV 3 " ESCAPE -SET UP TO E TO NEXT TEST 
1135 005114 0 004000 006260 MOV agit JDHSCR *MASTER CLEAR INTERFACE 
1136 005122 004767 006142 ISR PC, SETALL ;SET UP ALL LINES TO TRANSMIT 
1138 005126 012777 1 006246 MOV #1, DHS Pg cr Line TTPOR TESTING 
1135 005134 012777 0141 6 MOV etaabt SHEA cometh TRENSMITTED. 
1141 005142 012777 177777 2 MOV s TRANS TER ON LINE 1 
1142 pets 012777 133503 30 MOV $158803,6 QOHLPR ates Eo 1 ae 
ie ein ee fee eee US" cole 
1145 poe iS nels CLR RO’ i PEep COUN 3 RUNGE Or RECEIVED CHARACTERS 
1146 005174 017704 o06204 1S: HOV QDHNRC, RH GET na CHBRACTER ER on SI LON 
1148 ppeshe yt ; MOV RY,R3 *EXTRACT LINE NUMBER FORM CHARACTER 
tiga Boseoe ergata 177760 Bice #177760,R3 CLEAR STATUS BITS 

sx . 

1151 l Bisse MOV R3,Re , 
1152 005214 006302 ASL 2 
1153 O0se1 000001 CMP 3, #1 ;IF LINE NUMBER Is : 
1154 14 BEG 4 sCHECK FOR CORRECT ECHOED CHARACTER 
1155 014110 CMP RBUF (R2) , RY IF NOT LINE 1, CHECK DATA 
1156 005230 001404 BEQ 2s 
1157 O0sese 016206 014110 MOV RBUF (R2),RS ; (RS)=EXPECTED NON ECHOED DATA 
1158 1 st HLT 1 *NON ECHOED DATA ERROR 
1160 Oosee IDssee 014110 2s: INCB (R2) ; UPDATE EXPECTED RECEIVED DATA 
1161 1 1 *CONTINUE IF NOT DONE 

| 1162 O46267 014312 O0b226 BI LINBIT(R2),LINACT ‘CLEAR ACTIVE “BIT 
1163 005767 3S: 5 LINACT ITF ALL LINES ARE DONE 

| 1182 niesead 006110 a 7 QDHSCR ISELEC 

4166 ppeses Bis355 1 006106 BIC #100000, aDHLPR > CLEAR RauTo et ECHO FOR LINE 1 

| 1167 005300 105777 006116 TSTB  §@DHSLR GET REST OF CHARACTERS 

/ 1168 1333 BNE 1s > AND SRECK” 

| 1153 1 eh 4§ i RO ATE ECHOED CHARACTER COUNT 

| $ 

| U71 OOs3t nants 006636 ANS RY, TWROL CK E DATA 

| 4172 16 001757 BEQ 3$ 

| 473 O16 006630 MOV TWRD1,RS (RS) EXPECTED ECHOED DATA 

4 1 HLT @ sECHOED 6A 

| 1175 104400 S$: Sc *CHECK FOR ITERATIONS, LOOP 

| 4177 ; TRANSMIT A BINARY COUNT PATTERN ON ALL LINES EXCEPT LINE 2 
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1178 ; TRANSMIT 1 CHARACTER ON LINE 2 WITH AUTO ECHO ENABLED 
11793 sTRANSTITSSION SPEED FOR ALL LINES IS 9600 BAUD 
1180 :CHARACTER LENGTH IS 8 BITS 
1181 :VERIFY THAT CORRECT DATA IS RECEIVED ON ALL LINES 
1183 005330 012767 O00340 172440 Te3: MOV sDISABLE ALL INTERRUPTS 
1184 005336 912767 000010 006104 MOV Ho, rACouNT SET UP FOR 10 ITERATIONS 
1185 44 012767 O0SS64 906072 MOV APE :SET UP TO ESCAPE TO NEXT TEST 
1186 O0053Se Ole777 O04000 GoE0e2 MOV seitite JDHSCR sMBSTER CLEAR INTERFACE 
1187 005360 004767 005704 JSR PC, SETALL *SET UP ALL LINES TO TRANSMIT 
1188 3400 (octal) HARACTERS 
1189 005364 012777 oOD0002 oD6010 MOV #2, IDHSCR *SELEC IN 2 FOR TESTING 
1190 005372 012777 O14156 O06010 MOV 8TWRO2,JDHBA § ;CHARACTER TO BE TRANSMITT 
113) oe sON L LINE rR AUTO MODE 
1192 905400 012777 177777 OO068004 MOV RANSMIT ONLY I CH Cree ON LINE 2 
lisa Boeuts pase? Gaaoor poeaee Be eee seuenr LIke mayor aHD FOR LINE @ 
1195 peed pisses eatin 005764 MOV #1 CaDHER ;SET BAR BI Teor ALL LINES 
1196 eM po5000 i. CLR RO ae COUNT OF NUMBER OF RECEIVED CHARACTERS 
1197 9054 17704 005746 1S: MOV SDHNRC, R4 “GET A CHARACTER FROM SILO 
1198 005436 100375 . BPL 1$ :IF NOT VALID DATA, TRY AGAIN 
1199 010403 MOV RY,R3 sEXTRACT LINE NUMBER FORM CHARACTER 
1200 o0s44e SWwAB.StérR 
1201 177760 BIC #177760,R3 ;CLEAR STATUS BITS 
1202 005450 010302 MOV R3,Re 
1203 OS Mbe AS 
1204 020327 oo000e2 C R3, #2 ;IF LINE NUMBER IS 2 
1205 oOO0S460 001432 BEQ 4§ sCHECK FOR CORRECT ECHOED CHARACTER 
1206 905462 Oebe4 014110 CMP RBUF (R2),R4 7IF NOT LINE 2, CHECK DAT 
1207 005466 001404 BEQ 2$ 
| 1208 016205 014110 MOV RBUF (R2),RS ; (RS)=EXPECTED NON ECHOED DATA 
1209 474 19400 T 1 :NON ECHOED DATA ERROR 
1210 476 2 B 4g 
ell 10S262 014110 23: INCB REUF (R2) ;UPDATE EXPECTED RECEIVED DATA 
1518 014312 005770 Bre {PngrtcRe) ,LINACT fee an ve gIT Fadl 
| tela 005514 005767 005764 38: TST LINACT FA 
1216 pos333 oooo02 o0sés2 MOV 3 JDHSCR ils LINE 2 
| 1217 530 042777 yo006 005650 BIC #100000, IDHLPR ; CLEAR Alito ECHO FOR LINE 2 
| 1218 536 105777 TSTB  a@DHSLR *GET REST OF CHARACTERS .. 
1219 005S42 001333 BNE 1s :AND CHECK 
leek O05 ub 4§; FRc RO ;UPDATE_ECHOED CHARACTER COUNT 
1 0467 O06402 CMP RY, THRD2 *CHECK ECHOED DATA 
| 1223 005554 001757 BEQ 3$ 
| 1224 016705 006374 MOV TWRD2, RS » bE ZEX CTED ECHOED DATA 
| lees 104002 HLT 2  ECHOE 
! Leck 005564 104400 cs: SCOPE : CHECK OF OR ITERATIONS, LOOP 
| 1228 ; TRANSMIT A BINARY COUNT par TTERN ON ALL LINES EXCEPT LINE 3 
| 1229 : TRANSMIT 1 CHARACTER 0 ON LINE 3 ITH aUTO ECHO ENABLED 
1230 s TRANSAT SSION SrEe FOR ALL LINES IS 9600 BAUD 
egy 3 *CHARACTER LENGTH 
Te “VERIFY THAT CORRE Bat IS RECEIVED ON ALL LIN 
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005510 


177760 


000003 
014110 
014110 


014110 
014312 
0O0SS26 


100000 
1000 
o0S422 


172202 
OOSE46 
8 5634 

SS64 


oossse 
o0sSS2 
OOSS46 


005526 


Te4: MOV 
M 


1S: MOV 


2s: NCB 


3$: TST 


4$: INC 


#340,PS s DISABLE ALL INTERRUPTS 

#10, {COUNT ;SET UP FOR 40 ITERATIONS 

#53 ESCAPE -SET UP T Scare 10, TO NEXT TEST 

#BITI1, IDHSCR *MASTER aeeRCe ERF 

PC, SETALL *SET UP ALL LINES oO CE ONSMIT 
: 400 COCTAL) CHARACTERS 


“SELECT LINE 3 FOR TESTING 
ano. cr ABR ; CHARACTER TO Be” TRANSMITTED 
LINE 3 IN AUTO ECHO MODE 
HBC “TRANSMIT ONLY 1 CHARACTER ON LINE 3 
ti a8505, JDHLPR ECHO FOR LINE 3 


SET AU 

INACT ; CLEAR LINE ACTIVE BIT 

$1 SHS BAR ;SET BAR BITS FOR ALL LINE 
*KEEP COUNT OF RUMEER OF RECEIVED CHARACTERS 
JDHNRC, RY *GET A CHARACTER FROM SILO 
1$ ‘IF NOT VALID DATA, TRY AGAIN 
RY,R3 sEXTRACT LINE NUMBER FORM CHARACTER 
#177760,R3 ;CLEAR STATUS BITS 
R3,Re 
R3, #3 ;IF LINE NUMBER fe : 
sCHECK FOR CORRECT ECHOED CHARACTER 

RBUF (R2),R4 :IF NOT LINE 3, CHECK DAT 
RBUF (R2) ,RS ; (RS)=EXPECTED NON ECHOED DATA 
i. "NON ECHOED DATA ERROR 
RBUF (R2) ;UPDATE EXPECTED RECEIVED DATA 
1 *CONTINUE IF NOT DONE 
LINBIT(R2) ,LINACT :CLEAR ACTIVE 
LINACT jIF ALL LINES ARE DONE 
#3, JDHSCR 
#100600, JDHLPR iSELEGT ab it EeHO FOR LINE 3 
QDHSLR ie GET REST OF CHARACTERS 
RO UPDATE ECHOED CHARACTER COUNT 
Rd, THRDS t CHECK ECHOED DATA 
TWRD3, RS (RS)=EXPECTED ECHOED DATA 
2 sECHOED bata 


;CHECK FOR ITERATIONS, LOOP 


; TRANSMIT A BINARY COUNT N LINE 4) WITH AUTO CHO ENABLED LINE 4 
Teen tasto PEED. FoR we LINES g S600 BAUD 


ITS 
‘VERIFY FY THAT CORREGT Bat DATA IS RECEIVED ON ALL LINES 


Tes: MOV 


-——— ee ee 


;DISABLE ALL puree 


+10, 10, teow :SET UP FOR 10 ITERATIONS 

aS ESCAPE :SET_UP 0 ESCAPE 10 TO aiexT TEST 
#BITI1, IDHSCR >MASTER oe 

PC, SETALL SET UP ALL LINES "0 TRANSMIT 
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2s: 


3$: 


4§; 


ss: 


Te: 


SELECT 
STURDY, ee : CHARACTER TO BE” TRAN NSt ITTED 


$143803 SOHLPR ISET AUTO ECHO 
#20, LINACT 


. 477700, R3 ;CLEAR STATUS BITS 


4 
RBUF (R2) ,R4 IF NOT LINE 4, CHECK DATA 


es 

RBUF(R2),RS ; (RS) SEXPECTED nos ECHOED DATA 
NON ECHOED DATA ERROR 
; UPDATE poecree RECEIVED DATA 
CONTINUE IF NOT DONE 

tinerrcRe), LINACT ; CLEAR ACTIVE B 


oR 


SSunt ;DISABLE ALL INTERRUPTS 


BO3 























:400 cOCTAL) CHARACTERS 
LINE 4 FOF TESTING 


NL N AUTO ECHO MODE 
iTeensntT ONLY 1 te ON LINE 4 
FOR LINE 4 


;CLEAR LINE ACTIVE BIT 
;SET_BAR BITS FOR ALL LINES ‘ 
KEEP a cuNt OF NUMBER OF RECEIVED CHARACTERS 
GET @ CHARACTER FROM SILO 
IF NOT VALID DATA, TRY AGAIN 
‘EXTRACT LINE NUMBER FORM CHARACTER 


;IF LINE NUMBER IS 4 
;CHECK FOR CORRECT ECHOED CHARACTER 


GET REST OF CHARACTERS 
SAND CHECK 


;UPDATE ECHOED CHARACTER COUNT 
CHECK ECHOED DATA 


(RS)SEXPECTED ECHOED DATA 
sECHOED HATA E ERROR 
*CHECK FOR ITERATIONS, LOOP 


OUNT PATTERN ON ALL LINES EXCEPT LINE S 
LINE S WITH AUTO ECHO ENABLED 

INES IS 9600 BAUD 
S RECEIVED ON ALL LINES 


35 UP atop 10 TO rex? TEST 
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1 006340 012777 133503 o05040 MOV #133503 QDHLFR “SET AUTO ECHO FOR LINE S 
134 006346 Overe? 000040 905130 src O,L1 INACT T : CLEAR Line ACTIVE BIT 
1348 006354 Olev7? i777??? 005032 MOV - at OH ;SET BAR BITS FOR ALL LINES 
1349 Opp 362 CLR ;KEEP COUNT OF N NUMBER OF RECEIVED CHARACTERS 
1350 4 ocso14 18: MOV SDHNRC, Re GET A CHARACTER FROM SILO 
et Bere lin ie Bohber BH RUleen Foe Cacre 
1325 006374 Boose SWAB SOR 
1354 006578 4 177760 BIC #177760,R3 ;CLEAR STATUS BITS 
1355 O06402 91 MOV R3,Re 
1356 O06404 006302 ASL R2 
1357 006405 oo000s CMP R3, #S :IF LINE NUMBER IS S 
1358 OO06412 001432 SEG 4g’ sCHECK FOR CORRECT ECHOED CHARACTER 
1359 006414 014110 CMP RBUF (RE), RY IF NOT LINE S, CHECK DATA 
1369 06420 01404 BEQ 
| 1361 OOs422 01 014110 MOV RBUF (R2) RS ; (RS)=EXPECTED NON ECHOED DATA 
se OOb4eE HLT l *NON ECHOED DATA ERROR 
ee SR 4g 
136 Oe 432 1Os2be 014110 2s: INCB RBUF (R2) SUPORTE EXPECTED RECEIVED DATA 
1366 ppedse peEses 014312 005036 IC LINGIT(R2) ,LINACT CLEAR RETIVE BL soe 
1367 OO6446 005767 3S: TST LINAC ;1F ALL LINES ARE DONE 
1368 OOb45e bol 34 BNE i “EXIT 
1369 006 1 004720 MOV #5, SDHSCR *SELECT LINE S 
| 1370 OO08462 042777 100000 904716 BIC #100000, JDHLPR :CLEAR AUTO ECHO FOR LINE S 
1371 006470 105777 004726 TSTB = JDHSLR :GET REST OF CHARACTERS 
| 137¢ 006474 301233 BNE $ "AND CHECK 
ox 006476 QR z 
1374 906500 005200 4S: INC RO ;UPDATE ECHOED CHARACTER COUNT 
| 1375 O06502 Oe04E7 oOsHse CMP RY, THRDS :CHECK ECHOED DATA 
| 3376 006506 001757 BEQ 3$ 
| 1377 006510 016705 ocOsHsO MOV TWROS,RS -(RS)=EXPECTED ECHOED DATA 
' 1378 006514 104002 HLT 2 sECHOED BATA ERROR 
| 1379 oo65i6 104400 cs: SCOPE CHECK FOR ITERATIONS, LOOP 
| 41381 ; TRANSMIT A BINARY COUNT PATTERN ON ALL LINES EXCEPT LINE 6 
| 13g8 * TRANSMIT 1 CHARACTER ON LINE 6 WITH AUTO ECHO ENABLED 
| $383 ; TRANSMISSION SPEED FOR ALL LINES IS 9600 BAUD 
| 1384 : CHARACTER LENGTH Is 8 8 S 
| 1385 “VERIFY THAT CORRECT DATA IS RECEIVED ON ALL LINES 
! 
| 9387 006520 012767 000340 171 T27: MOV 8340, PS L NTERRUPTS 
| 1388 O06526 012767 000010 004714 MOV #10, {COUNT i erEb FOR iat “RATI NS 
1388 006534 012767 006754 004702 MOV aS :SET UP TO ESCADE TO NEXT TEST 
3390 SoesHe 012777 004000 O04632 MOV #8111. aDHSCR *MASTER CLEAR INTERF: 
/ 4391 004767 04514 ISR : ;SET UP ALL LINES TO TRANSMIT 
| $385 poeccy o1e777 coos oovezo MOY sab een TEST 
1334 006562 Bt S335 O14166 004620 MOV aT 
i 1 177777 004614 MOV 
133 biS777 33 004602 MOV &: £o Oe a pR 
1298 2767 100 powe7< BIC 1 
1496 Bock: thea Doane CR ORO 
1401 O0e622 O01 OO4SS6 1S: MOV SDHNRC, RY 
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004600 


o04462 
004450 
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es: 


3$: 


4$: 


ss: 


T30: 


18: 





DO3 


BPL 1$ sIF NOT VALID DATA, TRY AGAIN 

HOV RY, R2 ‘EXTRACT LINE NUMBER FORM CHARACTER 
BIc #177760,R3 CLEAR STATUS BITS 

HOV R3, Re 

CMP R3, #6 ;IF LINE NUMBER IS 6 


BEQ 4$ ;CHECK FOR CORRECT ECHOED CHARACTER 
CMP RBUF (Re) ,R4 IF NOT LINE 6, CHECK DATA 


MOV RBUF (Re), RS SOR =EXPECTED NON ECHOED DATA 
HLT NON ECHOED DATA ERROR 


SR 4g 
INCB  RBUF(R2) \PDaTe pegcten pace RECEIVED DATA 
BNE 1 CONTI NOT 

BIC LINBIT(R2) ,.LINACT ‘CLEAR ACTIVE BI Fs 

TST LINACT i IF ALL LINES ARE DONE 

BNE 18 us XIT 

MOV CR :SELECT LINE 6 

BIC +f 00bb0  SOHLPR *CLEAR aUTO ECHO FOR LINE 6 

TST8 aDHSLR GET REST OF CHARACTERS 

BNE 18 SAND CHECK 

INC RO ;UPDATE ECHOED CHARACTER COUNT 
cH RY, THROE :CHECK ECHOED DATA 

MOV TWRO6, RS (RS)=EXPECTED ECHOED DATA 
HLT 2 sECHOED BAT 

SCOPE :CHECK FOR ITERATIONS, LOOP 


; TRANSMIT A BINARY COUNT PATTERN ON ALL LINES EXCEPT LINE 7 
; NE 7 WITH AUTO ECHO ENABLED 
LINES IS 9600 


a #340 PS sDISABLE ALL INTERRUPTS 
MOV #10, {COUNT *SET UP FOR 10 ITERATIONS 
MOV #5$’ ESCAPE SET UP TO E TO NEXT TEST 
MOV eBIT11 QDHSCR :MASTER I 
JSR PC, SETALL :SET UP ALL LINES TO TRANSMIT 
*400 (OCTAL) CHARAC 
MOV 87, DDHSCR “SELECT LINE ? FOR TESTING 
MOV #THRO7 , OHBA sCHARACTER TO ss TRANSMITTED 
sON LINE 7 IN AUTO ECHO MODE 
MOV #-1, 3OHBC {Thanen ONLY 1 CHARAC R ON LINE 7 
MOV #133503, JOHLPR T AUTO E FOR LINE 
BIC #200, LINACT CLEAR Lite iat AC cTIVE BI 
MOV $1 SDHBAR I S_FOR ALL LINES 
RO P COUN NUMBER OF RE 
MOV SDHNRC , RY A CHARACTER FROM SILO 
BPL 1$ 6 NOT VALID DATA, TRY AGAIN 
MOV RY,R3 “EXTRACT LINE NUMBER FORM CHARACTER 





;CLEAR STATUS BITS 





ptr ee 
DZDHH MACY 1 
OZDHHB. P11 

1458 007100 
1459 007102 
1460 per ioe 
1461 00711 
1 114 
1 7116 
ae pele 
1vee O07] 
74 pees 
ives bariae 
1470 007146 
147 por iee 
i4 1S6 
as 
iw?s Qovize 
1476 007174 
1477 007 
1478 
1473 007204 
1480 007210 
1481 Q07e2le 

; 1482 

| 1483 
1484 
{Be 

14g? 

| = 1488 

| 1483 porary 
1481 007290 
1492 007236 
1493 007244 
1494 
1495 007250 
a 0072S6 
1482 007264 
1499 007272 
1 007 300 
1 
1 14 
1503 16 
ia 007322 
bf 
1507 
1508 
1610 pO7asG 
ety Sora 
1Si2 007346 
1513 007352 
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000007 
014110 
014110 


014110 


BONSse 


177760 


000010 
014110 


004342 


2c4 
ece 
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2s: 


33: 


4§: 


S$: 


T31: 


15: 





E03 


ASL R2 
CMP R3, 87 :IF LINE NUMBER IS 7 ; 
BEQ 4g sCHECK FOR GORRECT ECHOED CHARACTER 
CHP RBUF (R2),R4 -IF NOT LINE 7, CHECK 

MOV UF (R2) ,RS ; (RS)=EXPECTED NON ECHOED DATA 

HLT : ‘NON ECHOED DATA ERROR 

PRce RSUF (RE) sUPDATE EXPECTED RECEIVED DATA 

BNE 1$ “CONTINUE IF NOT DONE 

IC LINBIT(R2) ,LINACT CLEAR ACTIVE BIT 

St LINACT IF ALL LINES ARE DONE 

BNE 1$ : Ts 

MOV #7, JOHSCR :SELEC LINE 7 

BIC #100000, JDHLPR : CLEAR Tah 0 ECHO FOR LINE 7 

TSTB  aO0HSLR GET REST OF CHARACTERS 
BNE i$ AND CHECK 

INC RO ;UPDATE ECHOED CHARACTER COUNT 
Ci Rd, THRO? :CHECK ECHOED DATA 
MOV TWRO7, RS (BS )=EXPECTED ECHOED DATA 
HLT 2 sECHOED bata E 
SCOPE *CHECK FOR ITERATIONS, Loop 


Bla A BINARY COUNT PATTERN ON ALL LINES EXCEPT LINE 10 
; TRANSMIT 1 on EN ON LINE 10 WITH AUTO ECHO ENABLED 
LINES IS 9600 BAUD 


TRANSMISSION SPEED FOR 
 ChaRaCT TH IS 
: VERIFY Ee ten Ys Bafa T IS RECEIVED ON ALL LINES 
NOV ON ESUNT ts are uP FOR” 
MOV #19, Lcount iSET ie TO earn ts TEST 
MOV #BIT11, SDHSCR 
JSR PC, gis. | is ALL cee ACRANSHIT 
MOV #10, IDHSC CELEC LINE 10 FOR TESTING 
MOV #TWRDIO, SOHBA joumnncrtR 70 10 Ais i T anaes 
sd nL a50s SHES OHLPR 0 erty FOR IM iG Ce 0 
Bic ait aciaaet CLEAR is TAeyT Oe vent 
CLR RO’ tPErpeco Count Be Rone by RECEIVED CHARACTERS 
MOV SDHNAC, RY GET A CHARACTER 
BPL 1$ :IF NOT val ID BRT T TRY TAIN 
MOV RY,R3 “EXTRACT LINE NUMBER FORM CHARACTER 
2 tee #177760,R3 ;CLEAR STATUS BITS 
MOV R3,Re 
oa RS #10 IF LINE R 
go Ge ’ ; CHECK FOR MSerecT ECHOED CHARACTER 
chp REUF (Re), R4 :IF NOT LINE 10, CHECK DATA 








aiahahaal ake oe 


USEROUR Leas 


bb b= bb 8 0 b= 0 0 0 he 


SRA a a Hae A 


FO3 
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0 014110 MOV RBUF(Re),RS ; (RS)SEXPECTED_NON ECHOED DATA 
105601 HLT i. “NON E NOE aa ERROR 
105262 014110 23: INCB RBUF(R2) : UPDATE EXPECTED RECEIVED DATA 

1 BNE 1$ ‘CONTINUE IF NOT DONE 

014312 o04104 BIC LINBIT(R2) ,LINACT ‘CLEAR ACTIVE BIT 

905767 004100 3S: TST LINACT TF ALL LINES ARE DONE 
B01 344 BNE 1$ ae 

1 000010 003766 MOV #10, IDHSCR ELECT LINE 10 
04 003764 BIC #100000, JDHLPR CLEAR AUTO ECHO FOR LINE 10 
sees TSTB  aDHSLR GET REST OF CHARACTERS 
001333 BNE 13 AND CHECK 
ree 4g: INC RO sUPDATE ECHOED CHARACTER COUNT 
De04e/ 004532 ci Ru, THROLO CHECK ECHOED DATA 
016705 004524 HOV THRDLO, RS ee j (RG) EXPECTED ECHOED DATA 
hatred S$: CEOPE CHECK F TTERATIONS, LOOP 


RANSMIT A BINARY COUNT PATTERN ON ALL LINES EXCEPT cory bee ll 


HRS cLarteeet rot tt tities 189600 BAUD 


H IS 8 BIT 
VERIFY "Hat co CORRECT DATA is RECEIVED ON ALL LINES 


012767 OO0340 170316 T32: MOV § 8340,PS oe rake INTERRUPT S 
012767 990019 003768 MOV 910, fCOUNT igi uP F 10 ITERATIONS 
012767 O03 730 HOV aSS, ESCAPE : SET ve ESCAPE TO NEXT TEST 
2777 e,jbes ® TERF 
pheeeS hO3Sb6< nee perce tae : ser UP Pty c INES 70 SE oNSMIT 
012777 900011 003666 MOV #11, 3DHSCR “SELECT LINE 11 FoR TESTING 
012777 O14174 003666 MOV #TWRD11,9DHBA  ;CHARACTER TO BE 
Ran 11 IN AIT ECHO MODE 
012777 177777 003662 MOV a-1, S0HBC T ONLY 1 CHARACTER ON LINE 1! 
a 7 Stirs ? Br ai L one s CLEAR ut RE activ ity we LoS & 
a Gece by 31000 IN OFT Sha BITS FOR ALL LINES 
905000 CLR RO iKEEP. COUNT OF NUMBER OF RECEIVED CHARACTERS 
; - BPL $ any iTF No nor’ VAL VACID BATA Hay AGAIN 
O13 MOV RY,R3 EXTRACT CHRe NUMBER FORM CHARACTER 
177760 2 tee #177760,R3 ane STATUS BITS 
1 HOV R3,Re 
14 anaes au al ie HE ae PR edS Ae ORREC CHARACTER 
014110 eee ROUF(R2),RM iff NOT Cine ll, Bue RR BATE 
pone 014110 ay SUF (RE) RS (RS) NON DATA 
eet EF wate Ai EES Ea 
014110 2s: B (Re) DATE CT CEIVED DATA 
Abies ine ig tHONTINUE TF NOT DONE 
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046267 O14312 003646 Bic LINBIT(R2) ,LINACT -CLEAR ACTIVE BIT 
005767 O0364e 3%: TST LINACT i ALL LINES ARE DONE 
ie 000011 003530 BNE iS JDHSCR SELECT LINE 1 
042777 ico00 003526 I #100000, aDHLPR : CLEAR auto ECHO FOR LINE 11 
1 STB = ADHSL GET REST OF CHARACTERS 
901333 SNE 1$ ‘AND CHECK 
4g; Re BS ; UPDATE ECHOED CHARACTER COUNT 
Dede? 004276 chp RY, TWROLL CHECK ECHOED DATA 
ite 004270 MOV #Be011,R5 (RS) EXPECTED ECHOED DATA 
104002 HLT 2 sECHOED bata ERR 
104490 S$: SCOPE *CHECK FOR TERRY IONS, LOOP 
s TRANSMIT A BINARY COUNT PATTERN ON ALL LINES EXCEPT LINE 12 
‘TRANSMIT 1 CHARACTER ON LINE le WITH AUTO ECHO ENABLED 
: TRANSMISSION SPEED FOR ALL LINES IS 9600 BALD 
:CHARACTER LENGTH IS 8 BITS 
VERIFY THAT CORRECT DATA IS RECEIVED ON ALL LINES 
012767 OOO34O0 170060 133: MOV #340, PS ;DISABLE ALL INTERRUPTS 
012767 10 003524 MOV #10, [COUNT °SET UP FOR 10 ITERATIONS 
012767 tee oo3512 HOV acs, SCAPE : jSET ie TO ESCAPE TO NEXT TEST 
i - _— JSR pet cetatp ime UF ALL. Tires. to TRANSN IT 
1 2¢ MOV #12, JDHSCR CT LINE le FOR TESTING 
pt athe rete MOV stakble. JDHBA pe BE TRENSaITTED 
; sON LI mr IN AUTO ECHO MODE 
cigees ft ree NOY BL GSE SOHLPR 19 b othe FOR LING de Ie ie 
2767 sien ppscas BIC sLInac ; CLEAR Life se ve ETT 
oe . wren OCR fo.’ ee 1 0 ‘Bris POcNEeR SEP CEIVED CHARACTERS 
vege 063366 1S: V ,RY *GET A TERCPRON oF8 
100375 BPL 1§ IF NOT VALID DATA, TRY AGAIN 
40: MOV RY,R3 EXTRACT LINE NUMBER FORM CHARACTER 


177760 I #177760,R3 ;CLEAR STATUS BITS 


8 Lees iK 
042703 
Bee & fa 
: 000012 en : , #12 ; IF LINE BEEK FOR 00 C WROCTER 
014110 a REUF CR) RA F NOT L Cine le, CHECK DATA 


014110 MOV RBUF (R2), RS | (RS) SEXPES NON ECHOED DATA 
1 NON ECHOED DATA ERROR 


TE EXPECTED RECEIVED DATA 
F NOT DONE 


Rs 
mR 


014110 2s: 


ae 
as 
e 
8 


1395 4312 003410 BIE i T(R2) ,LINACT :CONTINE I T 
boere? Bhaab4 3S: iat tTNBeT ; ft LINE BRE DONE 
Birr TORS SSSR SHEDS «EEE SE 


le 
ECHO FOR LINE 12 
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05777 003300 TSTB  DHSLR GET REST OF CHARACTERS 
1333 BNE 1$ “AND CHECK 

meee 4g is 36 PDATE_ECHOED CHARACTER COUNT 

Beas? oououe Ae OR suroue + EECK EEHOED DAY 

001757 BEQ 

916 004034 MOV TWRD12,RS (RS)= =EXPECTED ECHOED DATA 

1 HLT 2 sECHOED bata 

104400 c$: sc CHECK FOR ITERATIONS, LOOP 
s TRANSMIT p BINARY COUNT PATTERN ON ALL LINES EXCEPT LINE 13 
Teen HRACTER ON LINE 13 WITH AUTO ECHO ENABLED 


eit Per Ora ott LINES IS 9600 BAUD 
i OERIFY ACTER ENGIN TS 8 Bara. S RECEIVED ON ALL LINES 


BLE? SOR ARTE TOY Ea LE a DT 
Ole7e? 910402 doses HOV WSS. ESCAPE iSET Up TO ScAPe TO EXT TEST 

569 BosObe JSR per cetate ge UP rat To TRANSMIT 

1 000013 00317 MOV #13, IDHSCR “SELECT LINE 13 FOR TESTING 
pistes ayia vt 135 MOV #TWRD13, JDHBA j CHARACTER. TO BE TRANSMITTED - 
pierre 135509 Spaiee NOV HER SS OHLPR ; aii ECHO bon Cine Ga hae 

ere 90409 boseHH BIC #4000,LINACT  ;CLEAR ue PGLIVE BIT T 

1 i 3146 MOV #-1, ITS FOR ALL LINES 

CLR RO *KEEP COUNT OF NUMBER OF RECEIVED CHARACTERS 
17704 003130 1S: MOV SDHNRC, RY :GET A CHARACTER FROM SILO 
100375 BPL 1$ IF NOT VALID DATA, TRY AGAIN 
10403 MOV RY, R3 EXTRACT LINE NUMBER FORM CHARACTER 
oie a 177760 Bree #177760,R3 ;CLEAR STATUS BITS 
MP R3, #13 sIF LINE 

14 ‘3 Bro if ae yee OR bBerect ECHOED CHARACTER 

; 014110 cHP RBUF (R2) , R4 it NOT LINE 13, CHECK DA 
016205 014110 MOV RBUF (R2),RS 3(RS) NON ECHOED DATA 
eee fe SEBEL Baa 
105262 014110 2s: INCB REUF (Re) poate XPECTED RECEIVED DATA 

014312 003152 Bre tEnerr Re) LInAcr EON ACTIVE BIT 
7? 003146 3S: ret LINACT Ie ALL LINES ARE DONE 

; 000013 003034 MOV +13, QOHSCR *SELECT LINE 13 

err 100000 003032 BIC #190000, SDHLPR CLEAR AUTO ECHO FOR LINE 13 
108777 003042 aie” iGET REST OF CHARACTERS 


;UPDATE ECHOED CHARACTER COUNT 


4§: 
* CHECK ECHOED DATA 


INC 
020467 003606 CMP RY, TWRO13 
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| 1706 0S04 
1707 
| 1708 1 
; 1709 010514 
1710 0S1 
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003890 


003006 
002710 


002714 


S$: 


T3S: 


1S: 


2s: 


4§: 





BEQ 33 

MOV TWRD13,RS (RS)=EXPECTED ECHOED DATA 
HLT 2 sECHOED baTA ERROR 

SCOPE ‘CHECK FOR ITERATIONS, LOOP 


; TRANSMIT A BINARY COUNT PATTERN ON ALL LINES EXCEFT LINE 14 
fey lf 1 CHARACTER ON LINE 14 og 0 Sy ENABLED 


TRANSHISSION SF SPEED FOR ALL LINES I 
:CHARRC FR NB RHECT Baas RECEIVED ON ALL LINES 
MOV ;DISABLE ALL INTERRUPTS 
MOV tid LeOUNT *SET UP FOR 10 ITERATIONS 
MOV r -SET UP TO ESCAPE TO NEXT TEST 
MOV #BI1T11, SDHSCR *MASTER CLEAR INTERFACE 
ISR PC, SETALL *SET UP ALL LINES TO TRANSMIT 
"400 (OCTAL) CHARACTERS 
MOV #14, IDHS >SELECT LINE 14 FOR TESTING 
MOV STWRD14, cre ;CHARACTER TO BE TRANSMITTED 
“ONL LINE 14 IN AUTO ECHO 
MOV 1, JOHBC j TRANSIT ONLY | CHARACTER ON LINE 14 
MOV 1138803 QDHLPR T PUTO ECHO FOR LINE 1 
BIC 0000,LINACT  ;CLEAR uth ACTIVE BIT 
MOV 1 ODRIBAR T BAR BITS FOR ALL LINES 
CLR RO ‘PEEP Count OF NUMBER OF RECEIVED CHARACTERS 
MOV JRY ;GET AC TER FROM SILO 
BPL 1 NOT VALID DATA, TRY AGAIN 
HOV RY,Ra ‘EXTRACT LINE NUMBER FORM CHARACTER 
BIC #177760,R3 CLEAR STATUS BITS 
w ee 
CMP R3, #14 ;IF LINE NUMBER IS 1 
BEQ 4§ CHECK FOR SORRECT ECHOED CHARACTER 
CHP RBUF (R2) , RY IF NOT LINE 14, CHECK DATA 
V (R2),RS j (RS)=EXPECTED NON ECHOED DATA 
HLT L “NON ECHOED DATA ERROR 
NCB BUF (R2) ; UPDATE CTED RECEIVED DATA 
Bre ae T(R2),LINACT SCONE raat Nett . 
tat CNA ; ce CThes DONE 
MOV #14, JDHSCR 


BIC #100000, JDHLPR FEAR RATE ECHO FOR LINE 14 
TSTB SDHSLR GET REST OF CHARACTERS 


BNE 1 AND CHECK 
RR BD ;UPDATE ECHOED CHARACTER COUNT 
CHP RY, TWROL4 :CHECK ECHOED DATA 

WRO14, RS -(RS)=EXPECTED ECHOED DATA 
HLT 2 ;ECHOED BATA ERROR 
SCOPE CHECK FOR ITERATIONS, LOOP 








+ TRANeNT Y ° men Shoo PATTERN ON ALL LINES EXCEPT LINE 16 
ige 16 ee ENABLED 


Gane eR eh ca hy ieleameelal 
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DZDHHB.P11 
17 : TRANSM I A BINARY COUNT PATTERN ON AL XCEPT LINE 15 
1738 STRANSHTT | CHARA TER-ON LINE Te, RYTH Rud ECHO Ene Leb 
1740 Trent ssi SPEED. FOR aul L LINES IS 960 
17e tCERIFY TER eNBRRECT DATA IS RECEIVED ON ALL LINES 
1744 O10642 912767 OO0340 167126 136: #MOV sDISABLE ALL INTERRUPTS 
Wie Giey GTSoED Olioey BOseGn NOV ti. fear sSET Ub FOR 10 TTERATIONG Teer 
iis 10664 64g285 hacia Baseed MOV settit JOHSCR sHASTER tebe ANFEREACE 
1748 010672 004767 002372 ISR PC, SETALL ie Up ALL LINES To TRANSMIT 
ibe 010676 Ol 15 476 MOV = cr Line ts F SEETING 
1731 010704 Ol 14204 nites MOV staAoie. crea ommncTés 18 be Be TRRNSATTTED 
1753 010712 Ol 1 7 MOV : rr ONLY NARBCTER ON LINE 15 
1754 010720 O1 133503 BeSae5 MOV eiaaeoae SOHLPR “SET AUTO ECHO bok LINE 15 
1755 010726 O4e767 O20000 o02ss0 BIC #20000, LINACT  ;CLEAR LINE ACTIVE BIT 
1756 010734 01 177777 002452 MOV 8-1, Seee DAA ;SET BAR BITS FOR ALL LINES 
1757 010742 005000 CLR RO iKE EP COUNT OF NUMBER OF RECEIVED CHARACTERS 
1758 O1074 017704 002434 1S: HOV @DHNRC ,R4 y CHARAC "Saar ao LON 
tyes igees Apacs oy ORS RG TEAGL VALID OATBL, ORM CHERACTER 
7p biovee es03 Bice #177760,R3 CLEAR STATUS BITS 
1285 bibres Vv R3,Re ' ‘ 
| 1764 OL ASL 
| 1765 010766 CMP R3, #15 ;IF LINE NUMBER IS 15 
| 1766 1077e 34 4 ;CHECK FOR CORRECT ECHOED CHARACTER 
| 1767 177s P REUF (R2) , R4 :IF NOT LINE 15, CHECK DATA 
| 1769 O11 MOV RBUF (R2) , RS 3(RS)= TED NON ECHOED DATA 
BR ' i pola 
| 772 O110le 014110 2s: INCB RBUF(R2) c IVED DATA 
| 1773 O11016 on 1$ {CONTI LON TRUE TE ior at 
1774 O11 < 014312 cO24s6 BI LINBIT(R2),LINACT CLEAR ACTIVE BIT 
| 1775 te 7 002452 3S: TST LINACT IF ALL LINES ARE DONE 
a 11 1 con BNE EXIT 
| i pit a Bppae ee st #1 38nd a SEHLPR SELECT S echo FOR LINE 15 
a. Bios boesNe Fete SOHSLR” :GET REST OF CHARACTERS 
/ 4 11054 001 BNE 13 “AND CHECK 
tras BLE fs 
1 il 4g; NC RO ;UPDATE ECHOED CHARACTER COUNT 
76 olin 7 003116 CHP RY, TWRDIS *CHECK ECHOED DATA 
i 11070 ole 003110 y feos, RS vas j (RS) =EXPECTED ECHOED DATA 
i767 Biioe ratte cs: Shope | ° TCO F ITERATIONS, LOOP 
1 
1 
1 
1 
1 


Bees 
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~ 


O1e767 000340 166670 137: MOV #340, PS DISABLE ALL INTERRUPTS 


Poe 2 


011100 
oe SLI Bigeee GT Ree SET HB CP ARABS ses 
1 111 1 4 002252 MOV #8IT11, IDHSCR ASTER CLEAR INTERF 
1799 011130 004767 002134 JSR PC, SETALL soe UP ALL LINES 19 ACE ANSNIT 
1800 400 (OCTAL) "CHRRACTERS 
tg54 Bites MEE Bracte BpSSa0 Moy + thabe ecb ga coset bet HN AoE Feo 
1804 11150 Ol 177777 002234 MOV 1,D0HBC NET BNCY oe LINE 16 
tBoe Biiiee 01 ? 133503 Soeeee Hoy ioe DHLPR ons 4: oer BUTO ECHO FOR LINE 1 
1B Sn fie Oe Be |; POS RES AL ron aL LIMES cence 
1 HHS BRE eins: nc SY octet Peon 5 
1810 011206 100375 BPL 1§ :IF NOT VALID DATA, TRY AGAIN 
ie ai8i2 es HOV. R4,R3 EXTRACT LINE NUMBER FORM CHARACTER 
1813 O11014 177760 BIC 8177760,R3 CLEAR STATUS BITS 
1814 11229 010302 HOV sRe 
iste Ol iees 000016 CRB RS, #16 IF LINE NUMBER IS 16 
1817 O11 14 BEQ isd CHECK FOR CORRECT ECHOED CHARACTER 
1818 Ol ies bes 014110 CHP RBUF (R2) , R4 IF NOT LINE 16, CHECK DATA 
1820 Bt 12a8 6205 014110 MOV § RBUF(R2),RS ; (RS)2EXPECTED NON ECHOED DATA 
ie See Ge ‘a casiodaca:haws 
1823 B11es8 10S262 014110 2s: INCB  RBUF(R2) UPDATE EXPECTED RECEIVED DATA 
ieee bt iSee ie 4312 002220 Bye {Fxg T(R2),LINACT SON aRET VE BIT genes 
1BSe Bi i5e8 Beese> 14 3S: uf tINeCT : i ALL LINES ARE 
1638 biie7e M237? 00001 902192 Ov ii SDHSCR ‘EEE TLINE 16, 
He ties tere as a ee ee ae 
He GiiG e 
1833 01131 4S: INC RO sponte ECHOED CHARACTER COUNT 
1634 011320 De0sb7 002662 cH RY, THROLG CHECK ECHOED DATA 
ies oli ipeons 002654 HOY TURD16, RS —— jR5) EXPECTED ECHOED DATA 
1638 ll 1 S$ SCOPE CHECK FOR ITERATIONS, LOOP 
ie Rea RSE eR POETS OI ERS ea © 
1eie Coane eR Oe mie it LINES IS 9600 BAUD 
ied ic T CoRR ; Bafa S RECEIVED ON ALL LINES 
1646 HE 012767 raft 166432 THO: MOV sgeteou Pak i RRUPTS 
1 11 12767 
BS ee et on 


FONSISPROMOOSES 


rv 


uw? 


=e 


—— ee 


SERRREOR Sse tcul sn Soe CPT OR COMO 
TERRORS ERO 


> +b — b= b-- bb 6 &  6-- b= 8 & = - b= — 8+ OP 9-2 <b 2b 0 b 0 — 6 = 0 = 0 9 pe 9 pp 
OOOO OOOOOOO OO OOOO 00000 00000000 
& 26 +b b-= b= b= b— & + 6-= b= 6 -= BF = b= b+ Bb ~ b= B= Fb b+ FP bh hh pH 9 ep = 
e+ hh P= > —= H+ b> f= & +0 -+ DP — = b= = b= b= >= b= = 0 & = bh B= pt Be 


uw 
ns 
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001676 


000017 
014210 


177760 


000017 
014110 
014110 


014110 
014312 
001756 


ae 


002426 
002420 





5 eA, elt 


NE 17 FOR TESTING 
cuaractéRe +e cE ANY 
: ON 17 


j TRANSNTT ONLY 1 CHARACTER RON LINE 17 
ce o 
8-1, aDHOAR 


ROMER or REce1vep CHARACTERS 


— STATUS BITS 


; IF LINE ok oy IS 1 
K_FOR CORRECT ECHOED CHARACTER 
te NOT LINE 17, CHECK DATA 


3 (RS) =EXPECTED NON ECHOED DATA 
;NON ECHOED DATA ERROR 


, PR ae REE RECEIVED DATA 
Pa eee ACT IVE BIT 
ALL LINES ARE DONE 


NE 
0 pe FOR LINE 17 
HARACTERS 


;UPDATE ECHOED auch COUNT 
;CHECK ECHOED DATA 


» fate eer CTED ECHOED DATA 
; CHECK POR ITERATIONS, LOOP 





a 


















i s TRANSNT 1 CHARACTER ON EACH LINE WITH AUTO ECHO ENABLED 
;RECEIVE 64 CHARACTERS ON EACH LINE 


Ro 
g1Nel2 INC RCNTO(R2) ;UPDATE RECEIVED COUNT FOR LINE 
‘ 141 cr Re, TWROO(R2) *CHECK EXPECTED AND RECEIVED DATA 
16205 014152 MOV TMROO(R2) , RS ;(RS)=EXPECTED ECHOED DATA 
dion? | HLT ,* . ‘AUTO ECHO ERROR 
f2 ol14es2 38: DEC ROCTO(R2) s UPOAT E RECEIVED EXPECTED COUNT 


;CONTI ‘ ott ve 


WF ERIAESS ERS 


rat is - = 3é 
DZDHH MACYLI 27(732) 29-SEP-76 15:23 PAGE 180 
DZDHHB.P11 
ieee O11E74 012767 OOO34O 166174 THl: MOV #340, PS ;DISABLE ALL INTERRUPTS 
isa 011602 012767 000100 Oo1640 MOV #100; ICOUNT SET UP FOR 100 ITERATIONS 
G1 1610 12767 b1e0e4 001626 MOV #S$, ESCAPE “SET UP TO ESC 0 NEXT TEST 
11bi6 12799 4000 001556 nov agit , aDHSCR sHBS**P CLEAR INTEREACE wie 
Ge THES fine Bee ye Y eo oda 
“ : v 
301 sete BtSo85 BY MOV #ROCTO BS SEEPECTED NU NUMBER OF CHARACTERS 
a5 Giles fuels (ee ous a HaR, LO Bie eh 
apa piieee Bt 777 131403 potess Noy SN eo eet AUTO ECHO 
905 O11664 905022 CLR (Re)+ ;CLEAR RECEIVED CHARACTER COUNT 
$06 11666 12723 0001 MOV #100, (R3)+ *=NUMBER OF CHAR ACTERS TO BE RECEIVED 
907 O116 0000 ROD #2, Ri “ADVANCE POINTER 
908 O11676 DE RO :CONTINUE IF NOT DONE 
$09 011700 001361 BNE 1$ 
310 011702 012767? 177777 o01S76 MOV #-1,AEACT s INDICATE AUTO ECHO ACTIVE 
ai2 011710 012777 1 001476 MOV #-1, IDHBAR sep TS FOR ALL LINES 
313 O1i71 105777 OO1HE0 23: ISTe QDHECR :WAIT FOR A CHARACTER 
| 181s Bt ees eae 001454 MOV SDHNRC, RY GET CHARACTER 
| dary Olt is map ORG? 
' 3918 O11 p42 177760 Bic #177760,R3 sEXTRACT LINE NUMBER 
| 91g ae 1 MOV R3,Re 
| it 
il 
11 
j ll 
| 11 
il 
11 
11 
ll 
1 
1 
1 
1 
1 
0} 


eh Bn he fe Be Fae ae be Bo be Bs Bs Bae Pe Pe bo Bs Bw bo Be fw be Bae 0 P= fo b= f= Fo ho B08 Bo Po 2 Pope 


REERESREN ESS 


00335: BGT 
| 1 jobs 0014 eat << elec LINE ay FINISHEC 
irae 042777 rane 901375 j BIC #109800 DOKL AR AUTO ECHO 
201 2 O14312 001470 . Me une 11 TCE SRT GEAR RUTO ECHO ACTIVE 

cols l 2g 3 IF NO SORT TUE 
20e4 L044 S$ COPE > CHECK bok ITERATIONS, LOOP 





ee eee ee eee 
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DZDHHB.P11 
1936 
1937 
1938 sEND OF PASS 
1939 TYPE NAME OF TEST 
1940 :UPOATE PASS COLINT 
1941 *CHECK FOR EXIT TO ACT-11 
134 RESTART TEST 
012026 104401 EOP: ‘TYPE ;TYPE NAME OF TEST 
pts 32 panes 001442 cr AST CLEAR LAST ERROR PC 
pt Sose 5067 001372 €LR RRFL *CLEAR ERROR FLAG 
O1e042 005267 901370 INC ASCN :UPDATE PASS COUNT 
O1c046 016767 001364 165514 MOV PASCNT, LIGHTS ‘DISPLAY PASS COUNT 
012054 013701 oo004e MOV ade, Ri ‘CHECK FOR ACT-11 OR DOP 
012060 001405 BEQ RESTRT SIF NOT, CONTINUE TESTING 
le062 O00005 RESET 
12064 ay LOGICAL: ISR PC, (RL) 
1e0e6 024. NOP 
1 G0e40 NOP 
012072 0 NOP 
012074 000167 167102 RESTRT: JMP BEGIN 


;CHECK FOR LOOP ON CURRENT TEST 
CHECK FOR ITERATION SUPPRESSION 


ee ee ee ee oe «ee ee ee 


012100 032767 002000 165462 SCOPER: BIT  sSWI0,SWR 
12106 001090 ug 
Ht oyoo00 16s4S2 1S: 1 ¥SU14, SWR 
131 + powooo 1eswHe BI $SW11, SHR 
O1e12 00100 Mm 
a 
iiss 5 BBIaIs 001306 ins LPT, ZCOUNT 
| 15142 O01 BNE 
15149 7 001302 2: ¢ CPCNT 
| 13150 005067 001260 CLR ——ERRFLG 
| 12154 ? OOlzee Hoy (SP) RETURN 
i ite 001254 " 3S: HOV RETURN, (SP) 
018170 Oub7e7 O012N0 us: TS ERRFLG 
13174 001745 Bo Ot«dSS 
012176 000762 BR tétRS 


;CHECK FOR FREEZE ON CURRENT DATA 
001000 165262 SCOPIR: BIT #SW09, SWR 


BIS BEQ 1 
BHI SHE Eg, Meza 


tia PERE R PR RRR tad ha aNd alee eee od 


r er me es a ae ee ee me a ee ee Ce ee 


BO4 





a. “ 
Sob ceed c & 
Git 23 BE Boe Fao og & a. ry 
OD 350 of a wn KRessear — oh = ws 
¢ Gghube tz Seeeeese 2 Ep a3 3 Edeg 
aw a. oO oO 
 cysgaetrangsugnnnonwttet nol Badal ey 
3» 8 pungesgsapaguenengnytee! net Uoaghengar Ge 
tas wn 3 oO- acs r=] 
iP s ; ei - 6S 
5 3 e 33 awe 5 (SS 
‘ z z, 8 
f BL gee gh gg mE 
x 8 8 88 s & as 8 
= C. —3t tr Ut. 4 és UO --0TM 
 RRSrsalene aeatcet oe Siege NORE 
‘2 Sseiatosts Bees SoRS8Sscscucecss 3 


: SBRReabemnacens 


Cam Death dee Detn Late dean Loot ham Len kame en kam Lam ben kan te tne) 


a 
fg 
BOBHOGHBOBGHBHBBGGO000 


Sa RANA ta 
OQOOONAOOWONMAAOOO8BMO0OAO000000 
QnMUMTriN 


ee me re ee ee eee ee ee ees 


p) ARON 


er ws a ee ee 
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DZDHHB. P11 
2034 . TRAP DISPATCH SERVICE 
£035 SARGUMENT OF TRAP IS EXTRACTED 
6 AND USED AS OFFSET TO OBTAIN POINTER 
| e030 :TO SELECTED SUBROUTINE 
2038 oO12420 011646 TRPSRV: MOV (SP). -(SP) ;GET PC oF oft Tune 
gH Dievee 162716 000002 SUB #2, (SP) ;=PC OF 
1 Oleves 017616 00000 MOV a(sP), (SP) T 
2042 012432 O06316 TRPOK: ASL (SP) EMULTIPLY TRAP ARG BY 2 
2043 012434 O42716 177001 Bic 4177001, (SP) CLEAR 
2044 O1e440 O62716 014752 STRPTAB, (SP) *POINTER TO SUBROUTINE ADDRESS 
2045 O1e444 017616 MOV Hf SP), (SP) :SUBROUTINE ADDRESS 
enug 01e459 000136 IMP a(SP)4 :G0 TO SUBROUTINE 
eng sSAVE PC OF TEST THAT FAILED AND RO-RS 
| 2080 O1e4S2 O16667 000004 O010!2 SVOSP: MoV 4(SP), SAVPC 
| oe SSAVE RO-RS 
| 2054 O12460 010567 901002 Sv0S: MOV RS, SAVRS 
2055 Ole464 010467 000774 MOV "5A 
| —056 012470 010367 000766 MOV R3, SAVRS 
‘Boge pecan tats a NOV RG caval 
3059 012504 010067 pops MOV "SA 
| 2060 012510 RTI 
| OBI RESTORE RO-RS 
| oes % 012512 016700 000736 RSOS: MOV SAVRO, RO 
| BOE4 012516 O1670 000734 MOV SAVR1 RI 
2065 Olesee O16 000732 MOV 5 
2066 Dieses 016703 000720 MOV SAVRS, RS 
2067 Olesse 016704 000726 MOV ¥ 
2068 Ole536 016705 CO0724 MOV SAVRS ‘RS 
2088 Oles42 RTI 
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os 

atu 
eeeeeeeee 
RL Si: 


see 


2 


RG 


£vo 


me OO 
NS 


ease 


bos 


SEEN 
men 
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OOOOOOOOOGOOCOOO000000 
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turururururu 
REBRER 
BURIALS teat td tt 
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s TELETYPE OUTPUT ROUTINE 


o90000 TYPER: MOV a(SP),RS 
ospode D #2. (SP) 
l 1S: TSTB OTPCER 


SPL 1 
TSTB (RS) 
es 
000604 es: MOVB (RS)+, 3TPDBR 
BR 1$§ 


;ASCII STRING INPUT ROUTINE 
000000 000006 INSTRG: MOV yt 


oo00002 ADD 2, 
INSTR1: TYPE 
MSG: 0 
014774 MOV SINBUF , RY 
000007 MOV #7, R3 
oo0s42 1S: 1318 aTKCSR 
090536 MOVB TKDBR, (R4) 
000290 BICB #200, (RY) 
000015 CMPBsé(R4) 4. #15 
BEQ INSTR? 
posed oo0s22 MOVB § @TKOBR, aTPDSR 
14 23: STB = ATPCSR 
BPL 2 
DEC R3 
BNE 1$ 
INSTRE: TYPE 
MOM 
ae INSTR 
INSTR2: RTI 
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i 


;CONVERT ASCII STRING TO OCTAL 


rurururury 
CoB F 


— & 2 <6 -+ p— p= 9 -- 


1 1 PARANS: MOV (SP) RS 
Bistos Bidee? ooo14s MOV (RS)4+,LOLIM 
2111 012708 0612567 900144 MOV (RS)+ HILIM 
| cil Ole7ie disse oo014 MOV. (RE) #DEVADR 
ell 1e716 112567 00014 MOVB (R5)+,LOBITS 
2114 Ole7ee 11256 MOVB = (RS 
2:15 Ole7eé O10516 MOV RS, (SP 
2116 012730 PARAM: CLR RS 
SCRE TES REC R ts RAea BT CRG 
stig pisces Astada : 
2120 Ole744 1el4e7 000060 1$: CMPB 3s (RY). 840 
2lei 012750 O0e415 BLT PARERR 
2lee Ole7Se lel427 000067 CMPB 3 s«(R4) . 867 
2123 012756 Oo030le BST RR 
eie4 bere e714 900060 BICB #60, (RA) 
sis? Oleree ers 000015 aree #15. (R4) 
2le7 Ol 14 BEQ LIMtTs 
2128 012774 006305 ASL 
| gies ble776 006305 aot RS 
| 
| 512? Oispee Bosses aS : 
| 2132 013004 104404 PARERR: INSTER 
e133 013006 000750 BR PARAM! 
els sTEST TO SEE IF NUMBER IS WITHIN LIMITS 
i 
| p137 013010 o20567 ocDD04e LIMITS: CMP RS, HILIM 
| 8138 O13014 101373 BHI 
| p139 613016 O20567 000032 CMP RS, LOLIM 
; e140 013022 103770 Bt 0 
| 2141 013024 136705 000032 ITB LOBITS,RS 
git 013030 001365 BNE PARERR 
shel sSTORE NUMBER AT SPECIFIED ADDRESS 
2146 013032 016704 oOcdze2 MOV DEVADR, R4 
«gig, Bishae Biase = Bile 
/ e148 013044 eee DECB  ADRCN 
2150 013050 BNE 1 
/ p151 013052 RTI 
| pis2 Ol LouIN: 
gib3 ot HILIM: 
1 } DEVADR: 
2155 Ol LOBITS: 
2156 ADRCNT=LOBITS+1 
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guzsssSseokc= soe Boe. & 
b eect eee Nice zeunt etek atid Be 
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8 BES GeSEPEESG PDRDMSBeuerienes Sue. 
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sy u 44 @ , #84 Shas 
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£260 ;CLEAR ALL BYTE COUNT AND BUS ADDRESS REGISTERS 


1 020 CLRALL: MOV #20, R0 ET uP T AR Ie 
OLSEN pier oe BRRP rt? CLR SeHBR see cam au Us ROBE sb 

13252 005077 000134 CLR JDHBC ‘CLEAR B 

013258 77 o00!20 INC JOHSCR *ANV ANCE [Ene° NUMBER 

1 DEC RO CONTINUE IF NOT DONE 
013264 001370 BNE 1$ 

013266 900207 RTS PC sRETURN TO CALLING ROUTINE 


;SET BYTE COUNT FOR ALL LINES TO 400 
:SET BUS ADDRESS FOR ALL ate. TQ TBUF 
CLEAR EXPECTED CHARACTER BUFFERS 

SET LINE ACTIVE BITS FOR ALL LINES 


013270 Ole700 000020 SETALL: MOV #20,R0 ;SET UP TO LOAD 16 
BYTE COUNT AND BUS ADDRESS 
;MEMORY LOCATI 

013274 005001 CLR Rl ;SET UP _TO GENERATE EXPECTED 
;RECEIVED CHARACTER BUFFER 

013276 Ol2702 000200 MOV #200, Re sWILL BE 


HIGH BYTE 
;0F EXPECTED RECEIVED CHARACTER 


BU NRO GANGS Senrssn Sapo 





013302 012703 000001 MOV —s- #1, R3 ;OFFSET FOR HIGH BYTE 
13306 012777 013510 000074 1S: MOV - STBUF, DHBA LOAD BUS ADDRESS 
013314 012777 177400 000070 MOV 8-400. IDHBC ;LOAD BYTE COUNT 
13322 012777 031403 000056 MOV #31403, JDHLPR ;SET LINE SPEED TO 4800 BAUD 
013330 105061 014110 CLRB = RBUF (RI) 
sRECEIVED CHARACTER 
013394 110263 014110 MOVB ——- R2, RBUF(R3) LOAD HIGH BYT 
013340 000036 INC SDASCR ;ADVANCE LINE NUMBER TO NEXT LINE 
| 2230 013344 005202 INC sUPDATE POINTERS 
2231 01334 062701 000002 ADD 12, ! 
| 232 013352 062703 000002 BOQ 82,R 
| 2233 013356 005300 DEC RO ;CONTINUE IF NOT DONE 
| 2234 013360 001352 BNE 1§ 
| 2235 013362 012767 177777 cOOLI4 MOV #1, LINACT sSET ACTIVE FLAGS FOR ALL LINES 
| 2236 013370 000207 RTS = PC RETURN TO CALLING ROUTINE 


ONOOOOOOO000000000 
O—* b+ B= & © p= F—0 HF -> F— FH —2 Bs F-= HH Be P= HP 


Renu Bae ass 
2 : 


OOOO OOOOOOOOOOOO000000 
0 2 0 Be 2 he be = Oe Oe ee ee 
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;{NDIRECT POINTERS 
177560 


RRR 
gay 
4-414 
VAX 
000 
inmMur 
DDD 
CO000000 < 
“3 
Ww 
o 
x 


< 
eee eee 
== OO000 


;PROGRAM VARIABLES 


;ERROR FLAG 

;PASS COUNT 

;ERROR COUNT 

;SCOPE RETURN ADDRESS FOR TEST LOOPING 
;ADDRESS FOR ESCAPE 
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DZDHHB.P11 

2280 00 TBUF: .BYTE 0 
1 Ol .BYTE DAT 

003 “BYTE  TDAT 


claiaiutatata 
NOUI£GITH-O 
SoRgee 

g 


ODONO0000 
ob 
NOUI£ CITC 
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oul 
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See eOR Suse SRA IOR 


BB 


Belrctcyici 


SMUT 
WOO NCU .£ WHO 


BR 


OREGON 3 


QEPPRRPR APA EBR ALLE REE? POR ABER SEMA DERES 
aa 
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BpReonee 


init 
NOUS WHO 


4 bas Ps 0 Bb Be hs 0 Fs he he bm hh = hh $b = b= eb b= b= = OF bb = bh Bb = Po fF fb Fb Pb he ep ep he 


Price Gavtses ean asaaca ieee manage 


DZDHH MACYII e27(732) 28-SEP-76 15:23 PAGE 190 
DZDHHB.P11 
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be 
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DZDHHB.P11 
2392 013670 160 -BYTE TDAT 
2393 013671 16] -BYTE OAT 
e3v4 013672 = Ibe -BYTE TDAT 
e395 013673 162 .BYTE DAT 
23% O13E74 164 -BYTE IDAT 
136 165 “BYTE TDAT 
1 166 “BYTE DAT 
3 136 167 -BYTE DAT 
2400 013700 170 .BYTE TDAT 
2401 013701 17 -BYTE DAT 
be Ot 1 “BYTE IDAT 
403 O1 1 “BYTE TDAT 
13704 = «174 -BYTE DAT 
e405 013705 175 -BYTE TDAT 
2406 013706 176 -BYTE DAT 
aug? o1 707 23s «177 “BYTE IDAT 
13710 200 “BYTE TDAT 
e409 013711 e201 -BYTE DAT 
e410 O137le 20¢ -BYTE OAT 
2411 013713 203 -BYTE DAT 
e4l2 013714 204 -BYTE DAT 
2413 013715 205 -BYTE DAT 
e414 013716 206 -BYTE DAT 
e415 013717 207 -BYTE DAT 
| S416 013720 210 -BYTE DAT 
Ble bles Bib ae Toe 
| Suis O1a78 els -BYTE DAT 
| e4e0 913704 8 §8= a4 -BYTE DAT 
e421 013725 215 -BYTE DAT 
| e422 01378 e216 “BYTE TDAT 
| e423 1sver, gl? -B TOA 
244 Ol 220 -B TOAT 
| 425 013731 eel -BYTE TDAT 
2426 013732 eee -BYTE TDAT 
e427 013733 ee3 “BYTE DAT 
e4e8 013734 ec4 -BYTE TDAT 
_ 2429 013735 225 -BYTE DAT 
| 2430 013736 = 226 “BYTE  TOAT 
| e431 013737 227 “BYTE TDAT 
| sige O1s74O = 230 “BYTE DAT 
2433 013741 231 “BYTE DAT 
| e434 13742 232 -BYTE  TDAT 
| 2435 013743 233 -BYTE TDAT 
«2436 013744 = B34 -BYTE DAT 
| eM b1a7e 235 BYTE TOAT 
| 438 O13746 236 -B TOAT 
| 2439 013747 237 -BYTE TDAT 
013750 240 -BYTE DAT 
1 013751 1 “BYTE TDAT 
| B44 ot ete “BYTE DAT 
e443 Ol “BYTE  TOAT 
e444 OL 44 -BYTE DAT 
| 2445 013755 245 -BYTE TDAT 
| P446 013756 246 -BYTE TOAT 
013757 B47 BYTE  TDAT 


| ew? 
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e456 013 260 “BYTE  TODAT 
2457 013771 261 .BYTE  TDAT 

1 eb "BYTE  TDAT 

1 6 "BYTE  TDAT 

13774 O64 "BYTE  TDAT 

el tive Se Be Tee 

1 ae spe "BYTE DAT 

2464 014000 270 “BYTE TDAT 

2465 014001 271 “BYTE DAT 
2466 014002 272 "BYTE 

2467 14003 273 “BYTE  TDAT 

2468 014004 274 “BYTE Dat 

2469 014005 275 “BYTE TDAT 

2470 014006 276 “BYTE  TDAT 

2471 014007 277 ‘BYTE  TDAT 

| 2472 014010 300 “BYTE  TODAT 

2473 014011 301 “BYTE  TDAT 

| 74 014012 302 “BYTE  TDAT 

75 O14013 303 “BYTE  TOAT 

| 247 914014 304 "BYTE TDAT 

| 477 O14O1s 305 -BYTE TDAT 
| Be BG hE Be 
| 2480 014020 310 “BYTE DAT 
| p4B1 O14021 311 “BYTE DAT 

e482 014022 312 “BYTE  TODAT 

| e4g3 14003 315 "BYTE T 

| e484 14084 314 "BYTE  TDAT 

| p4BS 014025 315 “BYTE DAT 
| 2486 014026 316 “BYTE DAT 

2487 014027 317 “BYTE DAT 
| e488 014030 320 “BYTE TDAT 
| p4B9 014031 321 “BYTE DAT 
| e480 014032 $e “BYTE  TDAT 
| e491 014033 -BYTE DAT 
 g492 014034 324 “BYTE  TDAT 

' 493 014035 325 “BYTE  TOAT 

| 2494 014036 326 ‘BYTE  TDAT 

| p4gs 014037 27 -BYT 

| p496 014040 30 "BYTE TDAT 

| p4u97 O14041 331 "BYTE 

| 498 O14042 332 “BYTE  TDAT 

83 014043 333 “BYTE DAT 

14044 334 ‘BYTE  TDAT 

1 O1404S 335 “BY TOAT 

| 2502 O14046 336 “BYTE DAT 

_ 2503 014047 337 “BYTE  TDAT 
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fu 
ui 
o— b+ pH 


WONOTWCWM-OwW 
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HADDAD 


EROS RRs 


014050 340 
014051 341 
0140Se s4e 
014053 342 
14054 344 
14055 345 
14056 346 
140S7 347 
014060 350 
014061 51 
1406e 
14063 353 
014064 354 
14065 2$5 
014066 356 
014067 357 
14070 360 
014071 361 
14072 362 
014073 363 
Olan © ep 
woe (ee 
014077 367 
014100 370 
ate ah 
14108 308 
014104 374 
014105 375 
014106 376 
014107 377 


014110 900009 
01415Se. 


~ 
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2539 oO141S2 100377 THROO: 10037 
40 Q1Nig8 100777 THRDI: 100777 
41 014158 101377 THRD2: 101377 
e542 O14160 101777 THRD3: 101777 
2543 O14i62 10237 TROY: 102377 
SH) MIEN 108777 THRDS: 102777 
e545 O14166 103377 THRDG: 103377 
2546 O14170 103777 THRO?: 103777 
2547 O1417e 104377 THRDIO: 104377 
2548 O14174 104777 THRDI1: 104777 
2549 014176 105377 TWRDI2: 105377 
2550 O'4200 105777 TWRDL3: 105777 
2551 014202 105377 THROL4: 106377 
e652 014204 106777 TWRDIS: 106777 
2553 O14206 107377 THRDI6: 107377 
2554 O14210 107777 TWRD17: 107777 
2555 O14el2 000000 RCNTO: 0 
014214 900000 RONTI: 0 
014216 000000 RCNTe: 0. 
es ies Bee ey 
S860 Oi4e4 900000 RCNTS: 
1 014205 RCNTE: 0 
014230 o00000 RCNT?: 0 
| 2563 O14232 o00000 RCNTIO: O 
2564 014234 000000 RCNTI1: 0 
| 2565 014236 000000 RONTIe: O 
14240 900000 RCNT13: O 
| 2567 Ol4e¥2 000000 RCNTIY: 0 
| 14244 900000 RCNTIS: O 
2569 O14e%6 000 RCNTI6: 0 
| 3870 O14850 00 RCNTI7: 0 
| 2571 Ol4e52 000000 ROCTO: 0 
| 2572 014254 900000 ROCTI: 0 
| 2573 014256 000000 ROCTe: 0 
| 2674 014260 go0000 ROCTS: 0 
| 2575 O14862 0000 ROCT4: 0 
| Be Bivses Gob000 C15: 0 
| 2577 014266 900000 ROCTE: 0 
| 014270 000000 DCT7: O 
_ 2679 O14e72 900000 ROCTIO: O 
| 2580 O14274 00000 ROCTII: O 
258) b1Ne7— 900000 ROCTIe: 0 
| 014300 ROCT13: 
| 014302 900000 ROCTIY: 0 
| 2384 014304 990000 ROCTIS: 0 
Be te ie mil 8 
| 14312 1 LINBIT: 1 
| 588 O14314 000002 é 
£589 014316 00004 4 
| 2590 014320 00010 10 
2591 O143¢2 000 20 
| 2592 014384 00004 5 
| 2593 014326 0001 109 


«2584 014330 conz00 
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;ENTER HERE ON POWER FAILURE 


;SAVE RO-RS ON PROCESSOR STOCK 


2 


= 
e 


Ee y: 


;SAVE STACK POINTER 
;SET_UP FOR POWER UP TRAP 
;HALT ON POWER DOWN NORMAL 


2 


tu 
N 


0-0» <0 ->— & = 0-H oH 


QO0000000 


e 


;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 
;RESTORE STACK POINTER 
ORE RO-RS 


: 


Sse 


;SET UP FOR POWER FAILURE 
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042012 030510 MTITLE: .wSCIZ ¢15)<12><12>/DH11 AUTO ECHO TEST 7<15> «12> _ 
OSeS01 047524 : 

044103 020117 

0S2123 4 

O42S2e6 OS2103 MVECTO: .ASCIZ <15><12>/VECTOR ADDRESS-/ 


poorre 
oi 116 MREGAD: .ASCIZ <15><12>/CONTROL REGISTER ADDRESS-/ 
114 Q4eSee 


- VW 
(15><1e> 
/ POWER FAILURE, PROGRAM RESTART AT TEST IN PROGRESS/ 


04 
O4eSee O0Sele3 
O201e4% 052101 
051 020124 

047Se2 
0S1 


0001 
OSS104 O44104 MEPASS: .ASCIZ «15><12>/DZDHH/ 
lee 


MR: SASCIZ <15)<12>/R/ 
042524 052123 MTSTPC: LASCIZ <15><12>/TEST PC-/ 


-EVEN 
; TABLE OF POINTERS FOR TRAP DECODING 


TRPTAB: SCOPER 
TYPER 


OCTASN 
ioe 
$ 
SCOPIR 
;BUFFERS FOR INPUT-OUTPUT 
INBUF: 0 
0 
MDATA: 0 


; TABLE OF POINTERS TO ERROR MESSAGES AND DATA 


” EMI 





i 


REC 


REC/ 


/AUTO ECHO ERROR/’ 15>< 12> EXP 
-ASCIZ /NON ECHOED DATA ERROP/<15><12>/EXP 
ZECHOED DATA ERROR/<15>< 12> /EXP 


wn 

Oo 

LalJ 

Pee. 

s seed : SSE 
3 - - & .i i? oe ‘3 
: gf Pthbalhh , 
: popes: : ea 
0 sues eas ae 
a, NOWRA TNS 
—: ; oo 


soir: tase! ERM 
Sia frapeascrmnrenscnasy Samrat ema te 


pled pbb pt pd pa pape pb ped pape pe pl pe ph pp sm Kamm Iam ame Keen Lan ie Reon Soatn ae Kom Rak Kee } 
QOQOOOWWIWWWIOOWAVINWWO0WO00000 BOO2D0Q09020000 


CORREA RG ReADAR AMMAN sts 


oe ee ee ee ee ae ee ——— 


DCOHH NACY11 e7(732) 


OZDHHB.P11 








FOS 
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Grae? OL S08 faigs F432 $438" 22738 





BEGIN O0l202 395 424 4308 1957 
BINWRD Oia 2167* 2168 21988 
BITX = 450s 4898 S288 S67e 60be 6458 6848 7238 7628 S018 8408 6798 9168 
9578 998 10358 10748 11258 11768 12078 12788 12298 13908 14318 14828 15338 
15848 16358 16868 17378 17688 18398 18908 
BITOO = 000001 Ss 
BITOl = 000002 48 
BITO2 = OOOO0Y 838 
BITO3 = 000010 28 
B1104 = 818 
BTTDE = oh 
BITDe = bas 
BITO8 = OOO4O0 778 
BITOS = 001000 768 
BIT1O = 002000 758 
BITI1 = OO4000 748 = 461 sp 846sss)Cté‘S?@®)2Otéi‘é‘éSi?~—~i‘wkésSOCSS CUCU 
929968 = 1007-1048 10841351186 123? 128813391390 
1843 1594 1645 169 1747 # «11798 1849 1897 
BIT12 = 010000 738 
BITI3 = 020000 728 
BITI4 = Q4OO000 718 
BITIS = 100000 708 
CHRCNT 013236 2165* 2169 2182 21968 2197 
CLRALL 013042 Wee 50 on 6s 612 7 6% 78 7 412 
69 1 1047 ¢ 
DATA = 25398 «25558 25718 
DATABP 012344 e00s* 2008 2015 P0188 
DATAX = 25398 «25408 «S418 «eS42e «25438 «2S44e «eS4Se «= eS46e «S78 «= 2S4ae «= aS498 
P5528 «25538 4«25S4e 25558 2556 2557 2559 S61 
256 2567 este 3569 2570 «25718 «25720 2573. 574s 575 
seb8 2580 1 2582 2583 2586 
| DEVADR Ol 21l2e 2146 2154s 
DHBA «D1 3410 tae Saux SB3e 622% 661% * 817% 
973% 1012% 10518 1088% 1139% 1190 1241% 12928 13438 1 1445% 
1598 164 1700 1751% 1802ee 853%  1902« * 2223e 22468 
'DHBAR «6013414 W7oe «= S1i# «© SS0# 583% 628% 7% 706% * 764% 8238 BGs 
97 1016% 1057% 1093% 1199* 1195" 246% 1297% 1348% 13998 14 
1603 1654* 1705 1756 1807% 858% 1912% 22488 
DHBC 80-3412 est *  S43% see 621% ei 593 730% 777% ®B16% 
* Olle 1 1090 1141% 1192% 243% 1294% 1345* 1396% 1447% 
| 600 1651% 170c¢e 1753% 16804% 1655* 1903% 2204 2224% 22478 
| BHEPR BT S408 “eee 4Bbe * 19% * 7% Be St4e  SBee 
eoer duos 648 * 1 * 14% 20% 742% * 
core & & % ox x t 3 Be 915% 
* * 1015* 1026% 10328 1065* 10718 1091% 1115 
1193% 12178 1244% le6a% 1295* 1319% 13468 13708 1397% 421% 1448% 
1S23e 1550" 1574% 1601" 1625% 16S2x 1676 1703 1727% 1754% 1778% 
1856% 1880 1904% 19318 22258 22uSe 
DHNRC 13404 ious ie aa oe ? 710 749 #«©+788 ~ # B27 
983 1022 1061 1095 1146 1197 1248 1299 1350 140L 1452 
1605 1656 1707 1758 1915 20448 
DHRLVL 013426 22538 








DZDHH MACYLL 2 
DZDHHB. P11 
DHRVEC 013424 
DHSCR 013402 
DHSLR 013422 
DHSSR 013420 
DHTL O12 
13430 
OT! 015230 
DT2 01524e 
EMI 015046 
EM? 015103 
EM3 0151 
ENDCOD 015260 
ENDFLG 013502 
EOP 012026 
ERRCNT O13440 
ERRFLG 013434 
ERRMSG 012332 
ERRORS Olecié 
ERTABD reais 
ESCAPE Bt 
EXITER 012370 
FREEZ1 O13446 
| HALTS 012350 
| HILIM 013056 
| ICOUNT 013450 
i 
| INBUF 014774 
| INIFLG 013474 
INSTER= 104404 
| INeTR = 104403 
foie Bee 
| There Ole61 
| INSTR2 012676 
ik = 000020 
| KX = 000020 
| LAST 
| 
| 
} 


"REFERENCE, TABLE’ 
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LIMIT’ 13010 2le7 21378 

tENAe Bi ene f4G. llll* 1112 1143% 11628 1163 1194* 213% 1214 1245% 
13h38 1316 1347% 1366% 1382 1398% 1417% 14 1449% 148% 
1S2 1851% 1570% 1 1602% l621% il622 1653% 1672% 1673 
17S5S® 1774 8 1775 1806 1825 1826 1857%  1876% 

LINBIT 014312 lili 162 1213 eb 1315 1366 417 1468 
1774 825 1876 193 25878 

LINE = 000020 4508 4898 S288 S678 6068 64S% 84% 7 
9578 9 1035@ 10748 11eS5# 11768 12278 # 12788 
15848 16358 1686 17378 17888 8398 908 

LOBITS 013062 ell3e 2141 21sse 156 

LOGICA 012064 19538 

LOLIM 013054 2110% 2139 21S28 

LPCNT 013452 1968% 1969 1971% 22658 

MCRLE Mi pited 2i6l t 

MDATA 1 2180 191 26928 

MEPASS 014722 194S 26678 

MPFAIL 014635 2636 ebS8e 

MQM 014626 2103 e6S68 

BR 014732 447 e6698 

MREGAD 014572 ais 26518 

MSG Ol2ble 208s* 2088s 

MTITLE Cl14S16 383 26438 

MTSTPC O14736 435 26708 

MVECTO 0O14SS0 406 cbses 

N = 000001 la 

OcTASC= 104402 2010 2017 2633 

Be TRON 013064 2i60e 2678 

=] 368 407 41S 436 

PARRMS 012700 21098 2681 

PARAM! 012730 ell6 2133 

PARERR 013004 2119 elel eat 132@ 2138 2140 2142 

PASCNT Ose 385% 1948% 194 cos 

PC = SOs 4Bex SOl# S40# 579% 618% 6S7# 
930% 969 1008 1047% 1085 1136% 41187% 1236 
1s44# 1995% 1646% 1697% 1748% 1799% 185 983 

PFAIL 9014352 348 383 26068 2627 

PFTAB O14SO6 26408 

POPRO = 012600 648 2025 

| POP1SP= 005726 re } 

POPeSP= 022626 bee 

PS = 177776 coe 381% 430% Y5oe 497% S36% 57S5# 614% 
sce 7% 1004* 1043% 1081% 1132% 
1438% 1489% 1540# 15918 642% 1693% 1744% 1795% 

' PUSHRO= 010046 638 

| PUSH1S= 005746 618 

PUSHES= Oe4646 Sa 

RBUF 014110 1104 1106 1109 1155 1157 1160% 1206 1208 
1319 1313% 1373 1361 1364% icf? 14le 141S# 
1517# 1 156 1568* 1614 161 1619* 1665 
1767 1769 1772% 1818 1820 1823% 1869 1871 

RCNTO Ol42l12 1 192l#  e2s5s5e 

RCNTI 14214 r 

' RCNTIO Ol4e r] 

, RONTIL 014234 clits 

RONTl2 014236 eStSe 
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y) 
he 


bo Pt Gs FS pe 


z 
z 


o— b= = bb b= B= b= he BS 
eH Pe 
Bs 





748% 


—-—b— bb LP 

Sarneeus FS 

iN . ie <= 
bad we as 
—— 


a 
a Le 
uw 
ee 
ae 


mr 
rata 


LW 
Be 


3 


SSIS ARE 


: 















DZDHH 
DZDHHB.P11 


R4 =%000004 


RS  =~000005 
SAVPC 013472 
SavRo | 013454 
SAVRI 013456 
SAVRe 013480 
SAVRS 913462 
SAVRG 13464 
SAVRS OL 3466 
SavsP 013470 
SAVOSP= 104406 
| SCOPE = 104400 
| SCOPER 012100 
| SCOPE1= 1049410 
| SCOPIR 012200 
| SETALL 013070 
i? =”000006 
| 
| SPACNT= 013237 
STACK = 015460 
eTART 001000 
\8TFLG 013476 
| vos 01460 
| Sv0SP 012452 
| Sudo = hoobor 
| Sub1 = oo0002 
| Bude = 000004 
| 5403 = 000010 
j 
| 


MACYLL 27{732) 


~ 
2 


S38 ies 


F - 
oY 
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1352% 
Bg 
1608% 


—UO OWwWu) 
x MK (KC 


woo 
as 


683 
le26 
1889 


1391 


ie 
sero 






1357 1403% 1404* #1405 1406 1408 
1507% 1508 1510 1556* 1557% 1558 
He oe” age ok. Es 1709 
eRe Rs 1 > ites ete au 
2174 2180% e2151% 2186% e2189% 2222 








93% 94 632% 71% 72 

Bee Beex «= Be? Saee Se” Bk 
1055s 1097 1104 1120 1146* 1148 
1250 1257 1273 12e99% 1301 1308 
1410 i426 14S2e 1454 1461 1477 
1579 160S* 1607 1614 1630 1656# 
1758* 1760 1767 1783 1809% 1811 
1916 1922 1999% 2000% e001  200cx 
2094* 2095 2117% 2118 2120 2le2 
2175* 2176% 2177% 2610 * 

713% 75e% 791% 830% 869% 908% 
1173% 1208% 1224% 1259% 1275% 1310% 
1514% 1530% 1S565* 1581% 1616% 1632% 
1836% 1871% 1887% 19c4* 1997% 1998% 
2110 elll 2lle 2113 114 211s 
2141 2147 el4e* e2169% e2178% e261! 


1259 761 800 839 878 917 






277 1328 1379 1430 1481 132 
1935 
1442 1493 1S44 1595 1646 1697 
1994 1997 2023 §©=62029% = 2039% 204% 
spt? 074% 5083 
11# ecble* ecbl 





oe 


NN EE eee 





KOS 
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DZDHHB.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 
SWwOY = 000020 33% 
SWOS = 328 
SWOB = 000100 318 
SWO8 = 000400 30% 
SWO9 = 001000 ese §=1983 
a a 
Sil 2 as 
SW13 = 020000 eS# 1990 
SW14 = 040000 eye 1964 
SWI5 = eat ; 
BAT = at ee6ie 5 ie cours coe coe 2285s oo es coe ree eee 22918 oe 
& 3 3 
i ot Bai Gal Bit pi et Gist Eel Bis Bie Get Bae 
23198 23208 e32l8 e3228 e3238 23248 e325e 23268 23278 23288 # 23308 23318 
23328 23338 23358 23368 23378 23388 23358 23408 e34le 23428 23438 2344s 
es4Se 23468 23478 e488 23498 23508 23518 23528 23538 23548 # 23578 
23598 3618 23628 23638 23648 23654 23678 23688 23698 23708 
23718 23728 23738 23748 23758 23768 23778 23788 23798 23818 23828 3 
4 8 23868 23878 23888 case 23908 23918 23928 23938 e 23958 23968 
e3978 23988 23998 ec4008 c40ls e4038 ec404s e405e 24068 24078 c408s 24098 
e4108 e24ils lee 24138 24148 24158 24168 24178 24188 24198 e4e08 e4ele eYece 
e238 8 86c4e4s ese cYebs ec4e7# ede8e = e4eS# = 6e4308 8624318 24338 24348 # 
24368 24378 24388 # 24408 e4418 e44ee e4438 = e444e = =e44Ss 7# 8644s 
ev49e 24508 e4518 e4See 24538 e4S4e 24558 24578 24588 ec4598 ec4608 ec46ls 
24628 evo4e 24658 24668 c4678 ec4688 c4698 ec4708 ec4718 e47ee C4738 
758 4 e4768 8624778 Sd 24798 ® 24818 e48e8 ec483e e484e e48S5e 24868 24878 
e48s8 c4898 24908 Sis e49e8 24938 24948 24958 24978 24988 24998 5 
# 20e8 2503 0S eS07# eS08# 25098 2510# eSil# eSle8 25138 
eS148 25158 2eSl68 25178 25188 25198 ecSe0e eSele eSeee eSe3e eSeh4e S25 
e # eSe9s 2308 eS3le# eS3ee eS338 eS348 25358 25368 
TEMP 0iS006 2170 = 26 30# )=—eb31* = e908 
TKCSR 013372 2091 22398 
an a ae 
TPOBR 013400 e080#  2097% 
TRPOK Ql2432 e04es 
TRPSRVY Ole4e0 3Se 8=6 20398 
TRPTAB ores 2044 epee 
TWRDO 80141 466 4 479 «1088 )=—ss: 1120 lize 81899 1922 1924 =. 25398 
TWROL 014154 SOS 516 $18 = 1139 1171 1173 2S408 
TWRD1O 014172 778 789 791 1496 1528 1530 S478 
ot 014174 817 828 830 1547 1579 381581 S48 
TWROl2 014176 8S6 867 669 «81598 81630 ~ = 1632 49 
TWROI3 014200 895 906 908 1649 1681 1683 2550s 
TWRO14 014202 934 945 947, 1700S s«173e)=ss1734 Ss SS 18 
ieee 6 ie 
TRD1? Bi4516 1081 1062 1064 ee 1885 1887 Sue 
TURDe O14156 S44 SSS 557 1190) Ss sleee Ss ile SHI 
TWROS 014160 P83 594 596° 1533 1e73 «1275 428 
TWRDY 14162 633 635 = ile 1 1326 438 
TWROS 014164 661 672 674 1343 1375 861377 = eS 44s 
TWRDB «86014166 700 711 713.0: 1394)~—s* 1426) 14eB 25458 
TWRO7? = 014170 733 750 752 2—Ss «HHS =—SsidH77?s«1H7GCti«éSHG 
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TYPOAT 012334 2009 «= 2015s _ 
TYPE = 104401 3648 3837] BOL3.ss2087 ade «Ss e1bO 2190 265 
TYPER 012544 20738 2677 
TYPNSG 012316 2007 20108 
if 001274 443-4888 
T1O 002676 731 
Tll 003054 7708 
Tle 003232 8098 
T13 = OO3410 e484 
a 
He  Bosiae ae 
Tl? 004300 1004% 
T2 001452 4974 
T Oo4456 10438 
Tel  Q04634 10814 
T o0s072 11328 
Ted -005330 11838 
Tey 005566 12348 
TeS 006024 12858 
Teo OE 262 13368 
Te? 06520 13878 
3 001630 5368 
756 14388 
T31 = 007214 14898 
T o074S2 1S408 
133 10 15918 
T34 = O10146 16428 
T35 = 10404 16938 
136 =©=-O1 0842 1744 
137 011100 17958 
TH 002006 5758 
‘THO 011336 18468 
TH.) (O11574 18948 
15 Oo2164 6148 
if ooe342 6538 
17 002520 652 
VEC! 001060 391 3048 
vECe 001070 3 
WROCNT 913234 2le4e 2192% 21958 
= 000000 : 
XBIT = 000000 4508 10748 
ALINE = 000020 4508 10748 
xN = OOOO4e Je 458 ble «497, S008 535. 398575 7s bY, B78 53. Sb 
| 692 6958 731 7348 #770 7738 809 Blew 848 8518 887 8908 926 
| 9258 968 10078 1043 «610468 «1081 1084" 1132 11358 1183 11868 
1234 «12378 «1285 )=Ss«ste88e «1336 = 1339" «1387 13908 «1438S 1441e «1489 = 14928 = 1540 
isige 159) 15848 leH2 = 16HS# 16831698 174H 17478 179517988 146 LENS 
Y = 000011 le 363 3648 3658 3668 3678 368% 3698 3708 3718 3728 
. = 018262 878 08 90 92 34 % 98 100 102 104 #106 108 110 
tt 
1 isos stH2sisTYs—(tisSC(<té‘«idSSCtCSDC(aés«S®—C(iéiédSH:C(té«éidSSRRC(<ésS«iaSESC(G;s«édODSCCséidLD 
164 = e6si(‘<«té«iCSS:*«d 72 426«174~—Ss—s«17%GCS*té«*L'7G 80 82 184 18 188 
190 192 4 Ol 198 = 200 02 204 206 208 210 22 4 
2i6 = 28 20 222 24  @26 228 630 e382 234 836 239 ddO 


- eee ee - ee ee 


oc + > —- 


MOS 


DCDHH = MACY1! e27(732)_ 23-SEP-76 15:e3 PAGE 207 
DZDHHE.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 





242 244 246 248 250 eSe es4 es6 es8 260 eb2 
shi Bah S5 Std 5B SOHC SHC (SHC SG: SRST 
320 3e 324 326 328 340 342 347% 


2 330 332 334 336 238 
3S4e 37ee 25388 e616 2632 eb7ee 26898 26918 ecb928 = ere4s 


a ee et ee ee ee 


ea ee ee +e ee ee = ee 
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RUTOL 4498 ase 489 528 S67 606 
AUTO2 449% =§61074 1125 1176 1227 1278 
1788 3 


8 
CCLRAL 4YEDs sae 
i 37ee = Yl 


678 8§=6481 520 $s$9 598 637 
1027 1066 1107 1123 1158 1174 
149 1464 1480 1515 1531 1566 
1821 1837 1872 1888 1925 
SSETAL 449% 2209 
TRPDEF 1g 363 364 365 366 367 
TS 1 458 497 536 $75 614 





2584 258s e586 
BUFFE le 2685 
CATCH ls 86 
-ENDCO l# 2737 
-EOP le 1937 
- ERROR le 1987 
-ERRTA l# 2694 
- HEADE ls 
TINSTR = s 182082 
j MSG 1s 2643 
-OCTAS le 2157 
-P l# 2106 
-PFAIL le 2603 
«POINT ls 2237 
| »~RESRE le 2061 
| .SAVRE le 2047 
| - SCOPE ls 1958 
| -SCOP1 le 1980 
| ISETVE Is 344 
- START ls 372 
- SYMB0 ls 20 
- TRPDE ls 358 
- TRPSR le 2034 
. TRPTA l# 2673 
my le 2070 
| , VARIA le 2256 





ee ee ee 


256 SB 


coe eon oe | 
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ies 

1 @ 
795 

2833 
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iD 
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m ZFo SAAB R RSRERR 8B SRSRERS RSSRRSRER Sasa 
u-T ta teeee Ce Kee hate feo Loe cu hee hee tee) ee | ted 
ORT FIFOTM- @W OnmMm— o SRS onm 
Bou Geese © REERR R = Sripaaseseers Sasae Fe 

a Cu-rmy a ree ee ory -@ spaee oy ey wg ee ene rv) | 

— F.0D W-3wW-w —@MOw—~a rae) - 

o $88 furs & genes B 8 SARSMSGEINAEeTess gusgy ge 
— wry 4 4-4-6 Ce ea ee ee ee) 4 “tty Pn tee Se eo en ain) Tw 
wy | 
or Tic ina OQ run “8 | 
#5 one SSG 2 SacBee R | SHRSESTSORSRS RT SR EREaee Se | 

-<ty ot eto tee Ce he tee toe roe] -_ itty Con eek ko) ttt Cu 
tat 
Ms OT-- © oa -<« -~ be al nie ~ oun Oro'cu 
“@ goa Gatos 3 SSRs & 9 PaRRTRASRSSMSRRSS ReRsEY 38 
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t? Suocsasnesees Rokeoe RF i SSRRAPSRRReRRSRS BGEs ae 
‘o 

2 Sakae heeeaes 2 ROARS eT RT eearanes anes oe 
‘ ols wn re 
Ce Toews MONTES F nial ges RTA Seas Sue 


rll ari 


Y 
401 
17s e 


pi oat Stee gS rae st et A SM SSeS SIS eat Se a 


oO 
send ib a7 wtmteteerery fucutU tte ae hen hen] AUN tet 
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22 Bi 3 dis Samad & & & Dd ns «RSS ae) | 


ed 
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AS teen pt ot ot A 


Bia dA aL Ace Ree ea suc tta ot ee 
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ROSS REFERENCE TASLE -- PER 


ORS ITE TY PE Sue Ue pe FON ORR AUN RIDES “UE R BNA 


Ret eee Roe Rie Re Doe he Re ee et oe ee ee ee re: 


EE TANM a RAMS SaCR SRRES RCM ST ERR ama ES 


om 
‘ 


+4 oo pore ee hee Ree ee toe ee bee Pee eee Pee eee ee re eee) 
ng Svsana ga PRAMAS Ruse ede Aehen susan taunts ae 
go, PP EER REARS MPa Ra MRR REE AE SANs coun uae aN 


2 
2 


DIOHH 
OCOHHB. Fil 
ENT 

HALT 

NC 

NCE 

I~ 

SR 

MOV 
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DZDHHB.Pi2 CROSS REFERENCE TASLE -- PERMANENT SYMBOLS 
NOP 1954 1965 1956 
RESET 19$2 
Be FURN aay 2b4e 
RTI 13 1976 1986 «62030 2060S (e069 Ss i079s—i210S—(iisS1 2194 
RTS e208 38 e236 
SUB 1998 = 2040 
SWRE 108 : ii? 1e00 3S «1281 1302 1383 1404 14655 1506 1557 1608 
TRAP 363 364 365 366 367 369 371 
TST See wk a iit 1183 ie ie 1316 ie pat 1469 
TSTB 473 of eet £40 33 668 is 6 785 824 
1058 6 «1116S sib? Ss 1218 1269s: 1320 1371 iwwe 8 8=61N73 0S Se s«157S 
1830 8=6 1881 1913. e075) 2077—ih92—_—s 2098 SC 1844 
ASCIZ 2643 2648 2651 2656 e657 e658 e667 2669 2670 704 2709 
BYTE 411 4le 419 420 440 441 e032 2280 # e28l e 2283 
2289 5,0 essi‘iSC( itiNC‘éES:C«‘éGE@tC«KESG 
§ e304 Oe 2306 5305 308 2309 231 e3ll = 23 s3h3 
3i8 62319 e e3el 2 ses. 0 ede4 SE e3e6 
4 e334 4862335) 2336—i337S— 2938 2S e339 eNO 34] = e223 
ese e399 e230 el 2 e353 «2384s e355 356 2387 
233 46364 OBS 3GGCi«é ess8 4 2369 «e370 e371 e372 2S 2373 
e378 = e379s—si2380—s381 02S 3822S 2383 384 2386 8 2387 
e333 «83H 0 —239S—iHS—(‘ié‘iS?C (GCSB (G2 e401 2402 
2409 Pt! e411 eile e413 e41Y 8 e41S) = =6b4l6 | =6e417? = 2418 
e423 8=— e444 = ee e427 = 4B 29 e431 e432 
e438 28439 e440 oud] ete e4e? 2445 e447 = 2448 
cis Sizg sis PH 2458 2459 2460 2461 2462 
ag .. eW73 0 N74 N75 isi7GssC?FZ——is HB 
ey83 e484 e485 c486 c487 e488 2489 2490 e491 2492 2493 
e498 8 2499 2501 eSOS 2506 S07 2508 
els 159 815 16 lf 18 619 cev eel eee ces 
eSeB 2s eSe29 e331 eS3e S33 eS S35 e7e6 ec7e8 8 e73l 
- ENABL 20 
- END 2738 
-ENDC 333 34 421 423 461 500 $39 $7 617 656 695 
890 $23 1046 =61084) 3=s «1135 1186 1237, 1288 =: 1339 
isc ss 1645s 1696Ssis1747—tsi«~7HBSC~«é‘«d NG 897 
-EQUIV 67 
-EVEN 2536 2672 
IF 331 333 4 461 aod $39 Bi? B38 695 734 
S23 968 104% | 1135 1186s] 1 1339 =: 1390 
1645 1696 1747 1798 81849 8=§=61897 
- FF 393 334 
-LIF 380 
- IRP 2e43 = 2277 
-LIST 1 m: 4 365 366 p07 368 369 370 371 372 
S28 7 Boe 17 6 656 684 695 ae 
Ble 840 851 91 957 968 996 1 
1125 is 11/8 1186 = le le78 («1288S si13e9s«s1339 0S: 1380 
1a65 ines ] issu 15 1 as 1686 so ELA tals 
2234 2586 Sep see Seq 500 5501 e502 2303 2304 
2309 «2310S se3l}~—s 2331 e3l e314 2315 2316 e231 e318 e319 
ese4 = 30S 23S e e3e9 2330s 23310 e332 0S 23339 2334. 
e339 234041 See 2S e343 HH 34S SHG SH? SHB 2349" 
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ess4# 2385 2356 2357 2358 2359 2360 2361 2362 é363 2364 2365 

ec 

Si Re Sk BG Rie Nie Be A Re OB Be Bee 
e446 







2429 «284300 2431 = 432.2433) 43H) 43S HE 437 2438 2439 2440 

mi ng et Re Se Go 2 fe i Gh Be oe 

e474 a7 2478 439 477s 2479 «= B4BO)~=Os« 8 Be e483 eed 

2489 2491 e492 24 2494 8495s u9GSti«Q 4 99 

2so4 40 aS0S)=ssaS06)=s«S0?Ss(ss08)=s«eS09)s—«‘iSi—si‘iSA SiC]? SssiS13sié‘éSCCBSIS 

2519 2520 4«6eS2l)2=s S220 S23 SH 2527 2529 439 2530 

2534 «= 2535) 5360539) S400 S41 «= 42) 543s 5440S SHS 54H CGH? 

2551 ess2 2553 9554 29555 2556 2557 2558 29559 23560 256) 

e5bb 2567 40 25680 25B9)—Ss2570—S—s 85711 e67e 2573 «2574S 57S) E7G—Oti«DS 7? 
“eg ebkaehe bee se 

fe 1135 1136 1186 l2e7 1349 1278 ©=-:1288 1358 1339 1380 1380 

1492 1533 $43. «1584 «=—s«1594 Ss: 1635 igus 1686 1656 137 1747 1788 

2294 3336 soe se 5595 sce 559 ss ; 2302 2303 SSa0 30 
2309 id gail g3ie 313 23149 2315 2316 2317 318 2319 2320 
2324 325 2 328 460 2309si330'—selsies—iD 2335 2336 2337 
2339 «e340 4] 2344 Ek | 26 4060 2347S e348 =Sss2349)ssi3SD0s3S1 ss S225 
| Boe R RRR BB ee ee ee 
| Boe ee eee Be ee & a ee 
| Sis Sua Susp Suge «| Suk) Suse «Suse Suse «| Sus Susg | Susg «| Suge Suge Sass || SugS 
| Ee Bg ge ge ge ae ge me fal 8 Rf Re BE 
Bee eee eee eee eee 
| soi ; 4 4 s 44 ee08 cece 2547 © as4g Seu 2550 
2581 2582 2583 2584 2586 2587 
i: ee 
| -TITLE 20 
| ERRORS DETECTED: 


0 
| DEFAULT GLOBALS GENERATED: 0 


| fyBZPae. SEO-UTTL 1 OZ 
RUN-TIME RATIO: 199/4722-9 


DoDHH 
OZOHHB . 


CORE USEC: 


Pil 


llk 


MACYL1 27(732)_ 28-SEP-76 15:E€3 PAGE 215 


CROSS REFERENCE TASLE -- PERMANENT SYMBOLS 
(21 PAGES) 


FO 


